Error: Export failed: Error: Failed to open file: CPV2011URY_CPV2011.ptr: iostream error

zip <- system.file("extdata", "uruguay.zip", package = "redatam")
dout <- paste(tempdir(), "uruguay", sep = "/")
dicx <- list.files(dout, pattern = "\\.dicx$", full.names = TRUE,