# NOT RUN {
foodA <- c(1,2,3)
foodB <- c(3,2,1)
L <- list(foodA = foodA, foodB= foodB)
# Use with a numeric variable
periodicity(foodA, "daily", "weekly")
#Use with a list
periodicity(L, "daily", "weekly")
# }
Run the code above in your browser using DataLab