# NOT RUN {
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