Conversion d'un json en data.frame

Bonsoir à tous,

La conversion échoue si l'une des variables est une liste vide.
Je ne sais pas comment contourner le problème, une idée ?

Code:

---

1 2 3 4

library(tidyverse) fj <- jsonlite::fromJSON(('{"ville" : "Rennes", "habitat": {}}'), flatten = TRUE, simplifyDataFrame = FALSE) df <- as.data.frame(fj) %>% glimpse()

---

Marc

La nuit a porté conseil, mais la solution est partielle, il manque la récursivité sur la liste

Code:

---

1 2 3 4 5 6 7 8 9 10

library(tidyverse) library(jsonlite) fj <- jsonlite::fromJSON(('{"version": "0", "habitat": {}}'), flatten = TRUE, simplifyDataFrame = FALSE) fj <- jsonlite::fromJSON(('{"version": "0", "protocol": {"habitat": {}}}'), flatten = TRUE, simplifyDataFrame = FALSE) fj2 <- Filter(Negate(purrr::is_empty), fj) # https://purrr.tidyverse.org/reference/keep.html fj2 <- fj %>% compact() df2 <- as.data.frame(fj2) %>% glimpse()

---