I have two date objects
X <- c("01-03-1993", "01-05-1997") #Mar 1993 and May 1997
Y <- c("01-02-1995", "01-08-1999") #Feb 1995 and Aug 1999
and a time series object
A <- ts(rnorm(120), freq=12, start=c(1992,8)) #Aug 1992 to Aug 2002
I want to create a binary (0-1) vector B that is of length 1:(A).
B should have value 1 for the time periods *across* my character
vectors, i.e. between Mar 93 ad Feb 95, and also between May-97 and
Aug-99, but zero otherwise.
Would anyone have any ideas on how to do this? I would paste the code
I am trying, but it would confuse rather than clarify (R newbie!). Am
getting really lost in 'for' and 'if' loops, so would really
appreciate any help!
Thanks!
ShruthiRE
#time series of 1 in the interval
Int1<-ts(1, start=c(1993, 3), end=c(1997, 5), freq=12)
Int2<-ts(1, start=c(1993, 3), end=c(1997, 5), freq=12)
#original time series
Y <- ts(rnorm(120), freq=12, start=c(1992,8)) #Aug 1992 to Aug 2002
#need zoo and as.zoo because time(ts) I don't see how to use time(ts) nicely
library(zoo)
#condition and values
ifelse(time(as.zoo(Y))%in% time(as.zoo(Int1)),1,0)
______________________________________________
R-help@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.
