# Text file is zipped to save space.
dataset_name <- system.file("extdata", "example_data.zip",
package = "asciiSetupReader")
sps_name <- system.file("extdata", "example_setup.sps",
package = "asciiSetupReader")
if (FALSE) {
example <- read_ascii_setup(data = dataset_name,
setup_file = sps_name)
# Does not fix value labels
example2 <- read_ascii_setup(data = dataset_name,
setup_file = sps_name, use_value_labels = FALSE)
# Keeps original column names
example3 <- read_ascii_setup(data = dataset_name,
setup_file = sps_name, use_clean_names = FALSE)
}
# Only returns the first 5 columns
example4 <- read_ascii_setup(data = dataset_name,
setup_file = sps_name, select_columns = 1:5)
Run the code above in your browser using DataCamp Workspace