Início / coding / Perguntas / 78029215
Accepted
tic-toc-choc
Asked: 2024-02-21 01:16:14 +0800 CST

Analise JSON simples em dataframe com R

  • 772

Um arquivo JSON aparentemente simples que gostaria de analisar com R:

tmp_extract <- "{\"encrypted_values\":[{\"name_a\":\"value_a\"}, {\"name_b\":\"value_b\"}, {\"name_c\":\"value_c\"}]}"

Uma tentativa jsonlite::fromJSONproduz um dataframe com tantas colunas quantos nomes e apenas um valor por coluna.

tmp_extract |> 
 jsonlite::fromJSON()

$encrypted_values
   name_a  name_b  name_c
1 value_a    <NA>    <NA>
2    <NA> value_b    <NA>
3    <NA>    <NA> value_c

(Eu também tentei, tmp_extract |> tidyjson::spread_all()mas sem sucesso.)

A saída desejada:

# A tibble: 3 × 2
  name   value  
  <chr>  <chr>  
1 name_a value_a
2 name_b value_b
3 name_c value_c

2 respostas

  1. Usando o pacote CRAN rjsoncons e a sintaxe de consulta JMESPath , crie em JSON um objeto com nome e valor dos campos

    query <- '{
    "name" : encrypted_values[].keys(@)[],
    "value": encrypted_values[].values(@)[]
}'
## check out our handiwork
j_query(tmp_extract, query) |> cat("\n")
# {"name":["name_a","name_b","name_c"],"value":["value_a","value_b","value_c"]}

    em seguida, 'pivô' para um tibble (ou data.frame)

    j_pivot(tmp_extract, query, as = "tibble")

    Essa abordagem é eficiente e flexível; também pode ser aplicado ao NDJSON.

    • 3
  2. Best Answer

    Tentar:

    tibble::enframe(unlist(unname(jsonlite::fromJSON(tmp_extract, simplifyDataFrame = FALSE))))
# # A tibble: 3 × 2
#   name   value  
#   <chr>  <chr>  
# 1 name_a value_a
# 2 name_b value_b
# 3 name_c value_c
    • 2

relate perguntas