Displaying 1 result from an estimated 1 matches for "nzdusd".
Did you mean:
nhusd
2012 Apr 27
1
multivariate xts merge question
...eurcad", "eurchf", "eurgbp", "eurjpy",
"eurnzd", "eurusd", "gbpaud", "gbpcad", "gbpchf", "gbpjpy", "gbpnzd",
"gbpusd", "nzdcad", "nzdchf", "nzdjpy", "nzdusd", "usdcad", "usdchf",
"usdjpy")
procState <- function(r, nams)
# r: row
# nams: column names
{
d<-data.frame(aud=0,cad=0,chf=0,eur=0,gbp=0,jpy=0,nzd=0,usd=0)
st<-head(grep(".1", nams, fixed=TRUE), n=1)
for (i in grep(".1", nams...