# NOT RUN {
data <- data.frame(
age = c(10, 20), sex = c("M", "F"),
mo = c(1, 2), sc = c(1, 2), ua = c(3, 4), pd = c(3, 4), ad = c(3, 4)
)
value_5L(data, "mo", "sc", "ua", "pd", "ad", "England", NULL, c(10, 70))
# }
Run the code above in your browser using DataLab