I'd suggest you look into the xts class and write require(xts) xts = as.xts(1:5,Sys.Date()+1:5) time(xts)[xts==3]
By the way, your code isn't pastable for me: not sure why. Michael Weylandt On Tue, Aug 9, 2011 at 10:39 PM, Richard Ma <[email protected]> wrote: > Hi all, > > I have a zoo time series object, see below code: > > ------------------------------------------------------------------------------------------- > > # This is a pasteable example > library(zoo) > > x <- c(1, 2, 3, 4, 5) > dt <- c("2011-01-01", "2011-01-02", "2011-01-03", "2011-01-04", > "201-01-05") > ts <- zoo(x, ts) > > > ------------------------------------------------------------------------------------------- > > Now, I want to know the date when 'ts' equal to a specific value. In this > example, suppose I want to know when the ts = 3? The program should return > "2011-01-03". > > Is there a function to do this job conveniently? > > Regards, > Richard > > ----- > Richard Ma > PhD student, Ecology & Remote Sensing > Climate Change Cluster, Department of Environment Science > University of Technology, Sydney > http://everydropr.wordpress.com > -- > View this message in context: > http://r.789695.n4.nabble.com/How-to-get-the-date-of-specific-value-within-a-zoo-object-tp3731885p3731885.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > [email protected] 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. > [[alternative HTML version deleted]] ______________________________________________ [email protected] 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.
