# numeric
vec <- c(-99.74,32.45)
x <- geojson_list(vec)
bounds(x)
# list
mylist <- list(list(latitude=30, longitude=120, marker="red"),
list(latitude=30, longitude=130, marker="blue"))
x <- geojson_list(mylist)
bounds(x)
# data.frame
x <- geojson_list(states[1:20,])
bounds(x)
Run the code above in your browser using DataLab