[R] override date in xts time series

arun smartpink111 at yahoo.com
Fri Nov 2 14:22:19 CET 2012


HI,
You can use:
library(lubridate)
index(y.1)<-update(index(y.1),month=1)
#or
index(y.1)<-update(index(y.1),month=unique(month(index(x.1))))


 y.1
                    [,1]
#2004-01-01 00:00:00    1
#2004-01-01 00:15:00    2
#2004-01-01 00:45:00    3
#2004-01-01 01:00:00    4
A.K.





----- Original Message -----
From: Eric Morway <emorway at usgs.gov>
To: r-help at r-project.org
Cc: 
Sent: Friday, November 2, 2012 7:55 AM
Subject: [R] override date in xts time series


   Using  the  following  bit  of  R,  I'm wondering if there is a way to
   override/manipulate/replace the date in one xts time series with the date of
   another xts time series while not affecting/changing the times of the xts
   time series?

   library(xts)
   x.Date <- rep("1/1/2004",times=5)
   x.Times<- c("00:00:00", "00:15:00", "00:30:00",
                  "00:45:00", "01:00:00")
   x<-paste(x.Date,x.Times)
   y.Date <- rep("3/1/2004",times=4)
   y.Times<- c("00:00:00", "00:15:00",
                  "00:45:00", "01:00:00")
   y<-paste(y.Date,y.Times)
   fmt <- "%m/%d/%Y %H:%M:%S"
   x.1<-xts(1:5, as.POSIXct(x, format=fmt))
   y.1<-xts(1:4, as.POSIXct(y, format=fmt))

   If possible, I'd like query the date of x.1 and use it to override the date
   in y.1, leaving the times as they are.  So the current output looks like
   this:

   x.1
   #                    [,1]
   #2004-01-01 00:00:00    1
   #2004-01-01 00:15:00    2
   #2004-01-01 00:30:00    3
   #2004-01-01 00:45:00    4
   #2004-01-01 01:00:00    5
   y.1
   #                    [,1]
   #2004-03-01 00:00:00    1
   #2004-03-01 00:15:00    2
   #2004-03-01 00:45:00    3
   #2004-03-01 01:00:00    4
   But I would like change y.1 to look like the following by using the date of
   x.1 (notice the month was updated to match x.1):
   y.1
                       [,1]
   2004-01-01 00:00:00    1
   2004-01-01 00:15:00    2
   2004-01-01 00:45:00    3
   2004-01-01 01:00:00    4
   Thanks, Eric
______________________________________________
R-help at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.





More information about the R-help mailing list