# NOT RUN {
## Creating a data frame with artificial adjustment factors
## (random numbers from uniform distribution U[1,2])
# }
# NOT RUN {
prodID<-unique(milk$prodID)
# }
# NOT RUN {
values<-stats::runif(length(prodID),1,2)
# }
# NOT RUN {
v<-data.frame(prodID,values)
# }
# NOT RUN {
## Calculating the QU index for the created data frame 'v'
# }
# NOT RUN {
QU(milk, start="2018-12", end="2019-12", v)
# }
Run the code above in your browser using DataLab