if (FALSE) {
c <- paste0("CL0", c("M", "N", "Q"))
futs <- getPrices(
feed = "CME_NymexFutures_EOD", contracts = c, from = "2019-08-26",
iuser = username, ipassword = password
)
swapCOM(
futures = futs, futuresNames = c("CL0M", "CL0N"),
pricingDates = c("2020-05-01", "2020-05-30"), contract = "cmewti", exchange = "nymex"
)
}
Run the code above in your browser using DataLab