# NOT RUN {
## Caluclating two indices by using two different package functions:
# }
# NOT RUN {
index1<-final_index(datasets=list(milk), start="2018-12",
end="2019-12",formula="walsh",interval=TRUE)
# }
# NOT RUN {
index2<-price_index(milk,start="2018-12", end="2019-12",
formula="geks",interval=TRUE)
# }
# NOT RUN {
## Graphical comparison of these two indices
# }
# NOT RUN {
compare_final_indices(finalindices=list(index1,index2),
names=c("Walsh index", "GEKS index"))
# }
Run the code above in your browser using DataLab