On Sat, Jul 28, 2012 at 3:57 PM, Christofer Bogaso <bogaso.christo...@gmail.com> wrote: > Dear all, I am into following coding: > >> library(quantmod) >> Data1 <- get(getSymbols("TCS.NS", from = as.Date("2008-01-01"), >> return.class = "zoo"))[,4] > Warning messages: > 1: In zoo(cd, order.by = index(x), ...) : > some methods for “zoo” objects do not work if the index entries in > ‘order.by’ are not unique > 2: In zoo(rval, index(x)[i]) : > some methods for “zoo” objects do not work if the index entries in > ‘order.by’ are not unique > > Here, I guess there are some duplicated dates-index. Is there any function > available to automatically extract unique indices ??? >
Try this: library(quantmod) Data1 <- Cl(getSymbols("TCS.NS", from = as.Date("2008-01-01"), auto.assign = FALSE)) dup <- duplicated(time(Data1), fromLast = TRUE) z <- as.zoo(Data1[!dup]) -- Statistics & Software Consulting GKX Group, GKX Associates Inc. tel: 1-877-GKX-GROUP email: ggrothendieck at gmail.com ______________________________________________ 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.