Skip to content

feeding merge.zoo a vector containing the names of zoo objects?

2 messages · rich.p.martin, Gabor Grothendieck

#
Hi, the snippet of code below works, but I would like to know how to feed the
function merge.zoo the contents of 
CADstocknames rather than having to hard code it into the merge.zoo command. 
I think I must be missing something simple, but I cannot for the life of me
figure it out.  Thanks in advance for any enlightenment offered.   


library(zoo)
CADstocknames <-  c("xbb.to","xsb.to","xiu.to")
for(i in 1:length(CADstocknames)){
assign(CADstocknames[i], get.hist.quote(CADstocknames[i],quote =
"AdjClose"))
}
mergedCAD <- merge.zoo(xbb.to,xsb.to,xiu.to, all = TRUE, retclass
="data.frame")
tail(mergedCAD)
#
Try using do.call:

library(tseries)
adjClose0 <- sapply(LETTERS[1:3], get.hist.quote, quote = "AdjClose",
    simplify = FALSE)
adjClose <- do.call(merge, c(adjClose0, retclass = "data.frame"))
On Sat, Mar 15, 2008 at 9:37 AM, rich.p.martin <rich.p.martin at gmail.com> wrote: