пытаюсь понять, как мне вытащить из
"{u'1': {u'user_answer': {u'11': 6, u'13': 3, u'12': 1, u'15': 10, u'14': 8, u'17': 7, u'16': 5, u'18': 2}, u'max_mistakes': 1, u'mistakes': 1, u'answer_status': 0}}"
хотя бы
u'11': 6, u'13': 3, u'12': 1, u'15': 10, u'14': 8, u'17': 7, u'16': 5, u'18': 2
в принципе, у меня почти получилось, но только до уровня "user_answer': {u'11': 6, u'13': 3, u'12': 1, u'15': 10, u'14': 8, u'17': 7, u'16': 5, u'18': 2}", с помощью вот такой конструкции: "(user_answer': ).+?[}\\]]". можете, пожалуйста, подсказать, как можно этот же запрос переделать так, чтобы он начинал с user_answer':, но не включал его в итоговую выдачу?
я перекопал хелп и погуглил довольно обильно, но нигде не смог найти, к сожалению.
как-то так, если на коленке res <- gsub("u'", "'", jsn) res <- gsub("'", '"', res) res <- jsonlite::fromJSON(res) res <- lapply(seq_len(length(res)), function(x) { tmp <- data.table(user = x, user_answer = rbindlist(res[[x]][1]), data.frame(res[[x]][-1])) } ) res <- rbindlist(res)
Обсуждают сегодня