# \donttest{
# Data File
path <- paste0(
system.file("extdata", package = "quadkeyr"),
"/cityA_2020_04_15_0000.csv"
)
data <- read.csv(path)
data <- format_fb_data(data)
get_regular_polygon_grid(data = data)
# }
Run the code above in your browser using DataLab