Commit 47ee4e03 authored by GNajeral's avatar GNajeral

Some very minor changes for 'Guille'

Added the ";" separator
Added local line for the wd path
parent 2ebe9c3e
File added
This diff is collapsed.
*.xlsx
harmonized_data/*
.Rproj.user
Version: 1.0
RestoreWorkspace: Default
SaveWorkspace: Default
AlwaysSaveHistory: Default
EnableCodeIndexing: Yes
UseSpacesForTab: Yes
NumSpacesForTab: 2
Encoding: UTF-8
RnwWeave: Sweave
LaTeX: pdfLaTeX
......@@ -2,6 +2,7 @@ rm(list=ls())
dir_name <- readline("Introduce the name of the directory please: ")
#/Users/gnl/Documents/CTB UPM/UNCOVER/uncover_harmonization
#C:/Users/guill/Documents/harmonize_scripts
setwd(dir_name)
......
......@@ -51,7 +51,7 @@ file_name <- readline("Introduce the name of the file to check the values: ")
harmonized_data <- ""
if (grepl(".csv" , file_name , fixed = TRUE)){
harmonized_data <- read.csv(file_name)
harmonized_data <- read.csv(file_name, sep=";")
}else if (grepl(".xlsx" , file_name , fixed = TRUE)){
harmonized_data <- read.xlsx(file_name)
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment