chengfen <- str_replace(test2[1], "data:","") %>%

• writeLines(., "chengfen.txt")
  chengfen_df <- read_json("chengfen.txt",simplifyVector = TRUE)
  Ошибка в parse_con(txt, bigint_as_char):
  лексическая ошибка: недопустимый символ в тексте JSON.
  NA
  (здесь) ------^
  Как решить эту ошибку?