Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- dataFile <- "test_data.csv"
- dataFile_strip <- "test_data2.csv"
- dataDir <- "/Users/alex/Dev/R/stockdata"
- file <- paste(dataDir,"/",dataFile,sep="")
- file2 <- paste(dataDir,"/",dataFile_strip,sep="")
- csv <- read.csv(file,header=TRUE,sep=",")
- csv$row.names <- as.POSIXct(as.character(csv$row.names),tz="",format="%Y.%m.%d")
- #write the file and remove the column with symbol name
- write.csv(csv[-2],file2,row.names=FALSE)
Advertisement
Add Comment
Please, Sign In to add comment
