Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- library(quantmod)
- dataFile_strip <- "test_data2.csv"
- dataDir <- "/Users/alex/Dev/R/stockdata"
- file2 <- paste(dataDir,"/",dataFile_strip,sep="")
- zz <- read.zoo(file2, sep = ",",format="%Y.%m.%d", header=TRUE,index.column=1,colClasses=c("character",rep("numeric",5)))
- head(zz)
- xx<- as.xts(zz)
Advertisement
Add Comment
Please, Sign In to add comment