Convert R data table column from JSON to data table

data.table, json, r

Solution

A variation without the need to separate out the JSON string

library(data.table)
library(jsonlite)

test[, info := gsub("'", "\"", info)]
test[, rbindlist(lapply(info, fromJSON), use.names = TRUE, fill = TRUE)]

#    duration country width
# 1:       10      US    NA
# 2:       20      US    NA
# 3:       30      GB    20

Problem

I have a column that contains JSON data as in the following example, ``` library(data.table) test <- data.table(a = list(1,2,3), info = list("{'duration': '10', 'country': 'US'}", "{'duration': '20', 'country': 'US'}", "{'duration': '30', 'country': 'GB', 'width': '20'}")) ``` I want to convert the last column to equivalent R storage, which would look similar to, ``` res <- data.table(a = list(1, 2, 3), duration = list(10, 20, 30), country = list('US', 'US', 'GB'), width = list(NA, NA, 20)) ``` Since I have 500K rows with different contents I would look for a quick way to do this.

Original source