library(jqr)

# Example JSON data (replace this with your actual JSON data or file)
json_data <- '[
    {
        "name": "John",
        "age": 30,
        "city": "New York"
    },
    {
        "name": "Alice",
        "age": 25,
        "city": "Los Angeles"
    },
    {
        "name": "Bob",
        "age": 35,
        "city": "Chicago"
    }
]'

# Convert JSON to dataframe
df <- json_data |> jq('map(. | to_entries | map(.value)) | add') |> as.data.frame()

# Print the resulting dataframe
print(df)