# NOT RUN {
data("popUS")
us <- US(data = popUS,colID = "id", unit = "state")
str(us, 1)
us1 <- US(data = popUS, colID = "id", unit = "state", add = ~I(population/100))
str(us1, 1)
us2 <- US(data = popUS, colID = "id", unit = "state",
add = ~I(population/100), new_var_names = c("population/100"))
str(us2, 1)
# }
Run the code above in your browser using DataLab