json.R

library("roomba")
json_jsonlite <- jsonlite::fromJSON("data.json",
                                    simplifyVector = FALSE,
                                    simplifyDataFrame = FALSE,
                                    simplifyMatrix = FALSE)
json_roomba <- roomba(json_jsonlite$data, cols = "values")
library(tidyverse)
json_roomba %>% str_split(",")

#jsonlite atomic level
json_jsonlite$data$result[1][[1]][[2]][[1]]