Hello,
Here my R code :
library(xts)
library(quantmod)
quotes <- read.csv2("E:\\00001-Compare\\Output\\OutputJBacktesting\\InputIndic.txt",
header = FALSE, sep = ",", dec=".")
x <- xts(as.matrix(quotes[,-1]),as.POSIXct(paste(quotes[,1]),format='%m/%d/%Y
%H:%M'))
colnames(x) <- c('Indic')
x
write.csv(x, file = "OutputIndic.csv", quote = FALSE, row.names = FALSE)
The x give this output to the R Console :
colnames(x) <- c('Indic')
x
Indic
2007-01-08 00:59:00 1.93025
2007-01-08 01:59:00 1.92960
2007-01-08 02:59:00 1.92805
My goal is to generate this kind of CSV output :
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
01/08/2007,02:59, 1.92885
My write.csv generate this CSV output :
Indic
1.93025
1.9296
1.92805
How to generate this kind of output ?
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
Thanks,
Pierre8r
____________________________________________________________
ente http://mail.yahoo.fr
Hi Pierre,
try:
x <- xts(matrix(runif(10,1.9,2)), Sys.time()+1:10)
x <- matrix(c(strftime(as.POSIXlt(index(x)),'%m/%d/%Y,%H:%M'),x),dimnames=list(NULL,c('','Indec')),nc=2)
write.csv(x, row.names=FALSE, quote=FALSE)
,Indec
07/16/2008,14:59,1.92998949340545
07/16/2008,14:59,1.92604529005475
07/16/2008,14:59,1.90992500772700
07/16/2008,14:59,1.90918286179658
07/16/2008,14:59,1.98319136707578
07/16/2008,14:59,1.95377100475598
07/16/2008,14:59,1.90766719337553
07/16/2008,14:59,1.9713675866602
07/16/2008,14:59,1.94339190139435
07/16/2008,14:59,1.95427884196397
HTH
Jeff
On Wed, Jul 16, 2008 at 9:32 AM, <pierre8r-list at yahoo.fr> wrote:
Hello,
Here my R code :
library(xts)
library(quantmod)
quotes <- read.csv2("E:\\00001-Compare\\Output\\OutputJBacktesting\\InputIndic.txt",
header = FALSE, sep = ",", dec=".")
x <- xts(as.matrix(quotes[,-1]),as.POSIXct(paste(quotes[,1]),format='%m/%d/%Y
%H:%M'))
colnames(x) <- c('Indic')
x
write.csv(x, file = "OutputIndic.csv", quote = FALSE, row.names = FALSE)
The x give this output to the R Console :
colnames(x) <- c('Indic')
x
Indic
2007-01-08 00:59:00 1.93025
2007-01-08 01:59:00 1.92960
2007-01-08 02:59:00 1.92805
My goal is to generate this kind of CSV output :
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
01/08/2007,02:59, 1.92885
My write.csv generate this CSV output :
Indic
1.93025
1.9296
1.92805
How to generate this kind of output ?
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
Thanks,
Pierre8r
____________________________________________________________
ente http://mail.yahoo.fr
_______________________________________________
R-SIG-Finance at stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-sig-finance
-- Subscriber-posting only.
-- If you want to post, subscribe first.
Jeffrey Ryan
jeffrey.ryan at insightalgo.com
ia: insight algorithmics
www.insightalgo.com
On Wed, Jul 16, 2008 at 9:32 AM, <pierre8r-list at yahoo.fr> wrote:
Hello,
Here my R code :
library(xts)
library(quantmod)
quotes <- read.csv2("E:\\00001-Compare\\Output\\OutputJBacktesting\\InputIndic.txt",
header = FALSE, sep = ",", dec=".")
x <- xts(as.matrix(quotes[,-1]),as.POSIXct(paste(quotes[,1]),format='%m/%d/%Y
%H:%M'))
colnames(x) <- c('Indic')
x
write.csv(x, file = "OutputIndic.csv", quote = FALSE, row.names = FALSE)
The x give this output to the R Console :
colnames(x) <- c('Indic')
x
Indic
2007-01-08 00:59:00 1.93025
2007-01-08 01:59:00 1.92960
2007-01-08 02:59:00 1.92805
My goal is to generate this kind of CSV output :
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
01/08/2007,02:59, 1.92885
My write.csv generate this CSV output :
Indic
1.93025
1.9296
1.92805
How to generate this kind of output ?
01/08/2007,00:59, 1.93025
01/08/2007,01:59, 1.92955
Thanks,
Pierre8r
____________________________________________________________
ente http://mail.yahoo.fr
_______________________________________________
R-SIG-Finance at stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-sig-finance
-- Subscriber-posting only.
-- If you want to post, subscribe first.