x1 <- priceIts(instrument = c("^ftse"), start = "1998-01-01",
quote = "Close")
x2 <- priceIts(instrument = c("^gdax"), start = "1998-01-01",
quote = "Close")
x <- union(x1,x2)
names(x) <- c("FTSE","DAX")
plot(x,lab=TRUE)
Run the code above in your browser using DataLab