如何使用'quantmod'获取特定日期的yahoo汇率？

Question

我正在使用以下代码获取汇率

library(quantmod)
from <- c("CAD", "JPY", "USD")
to <- c("USD", "USD", "EUR")
getQuote(paste0(from, to, "=X")) 

但是，这给了我最新的报价。如何获取特定日期（例如2019-7-20）的报价？如果可以根据我的代码进行修改而不是查找新功能，那将是最好的选择。谢谢！

Answer 1

我理解问题的方式，是在寻找以下内容。

getSymbols(paste0(from, to, "=X"), from = "2019-7-01", to = "2019-7-31")
#[1] "CADUSD=X" "JPYUSD=X" "USDEUR=X"

showSymbols()
#CADUSD=X JPYUSD=X USDEUR=X 
# "yahoo"  "yahoo"  "yahoo" 

head(`USDEUR=X`)
#           USDEUR=X.Open USDEUR=X.High USDEUR=X.Low USDEUR=X.Close USDEUR=X.Volume USDEUR=X.Adjusted
#2019-07-01       0.88000       0.88451      0.87970        0.87990               0           0.87990
#2019-07-02       0.88597       0.88678      0.88331        0.88594               0           0.88594
#2019-07-03       0.88567       0.88728      0.88454        0.88550               0           0.88550
#2019-07-04       0.88590       0.88697      0.88510        0.88590               0           0.88590
#2019-07-05       0.88605       0.89220      0.88590        0.88607               0           0.88607
#2019-07-08       0.89064       0.89219      0.88990        0.89068               0           0.89068