From 6eb7bc9e70df76148eab8135e688f32b7431eb76 Mon Sep 17 00:00:00 2001 From: JulioV Date: Tue, 5 Nov 2019 11:47:20 -0500 Subject: [PATCH] Fix quoting problem with columns containing quotes --- src/data/download_dataset.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/data/download_dataset.R b/src/data/download_dataset.R index aed44e57..b5ef01c1 100644 --- a/src/data/download_dataset.R +++ b/src/data/download_dataset.R @@ -19,5 +19,5 @@ sensor_data <- sensor_data[order(sensor_data$timestamp),] # Droping duplicates on all columns except for _id sensor_data <- sensor_data %>% distinct(!!!syms(setdiff(names(sensor_data), "_id"))) -write.table(sensor_data, sensor_file, row.names = FALSE, quote = FALSE, sep = ",") +write.csv(sensor_data, sensor_file) dbDisconnect(stopDB) \ No newline at end of file