build json из вложенного фрейма данных в r

Question

Я борюсь с созданием json.

У меня есть фрейм данных с 3 строками и двумя столбцами: «id» (список идентификаторов), а затем «text» (твиты) .

df$id= c(78198310004451, 78198310004451, 88198310004453)
df$text = c("I love you", "I just got married!", "I just got a new job!")

and four other fixed variables whose values are static:
Models = c(1:7)
orgId= 1
and two attributes of the twitter id
include_outcome: logi FALSE
twitterId = 70051429

Я вытащил шаблон json и преобразовал его в фрейм данных (см. Ниже) для примера 3 твитов.

Я не могу понять, как создать такой фрейм данных из моего ранее существовавшего фрейма данных, который я упоминал выше (который я затем преобразую в json (в JSON)).

List of 3
 $ Models: num [1:7] 1 2 3 4 5 6 7
 $ orgId       : num 1
 $ userData    :List of 1
  ..$ :List of 3
  .. ..$ tweets           :List of 3
  .. .. ..$ :List of 2
  .. .. .. ..$ text: chr "I love you"
  .. .. .. ..$ id  : num 78198310004451
  .. .. ..$ :List of 2
  .. .. .. ..$ text: chr "I just got married!"
  .. .. .. ..$ id  : num 78198310004452
  .. .. ..$ :List of 2
  .. .. .. ..$ text: chr "I just got a new job!"
  .. .. .. ..$ id  : num 88198310004453
  .. ..$ twitterId        : num 70051429
  .. ..$ include_outcome: logi FALSE

вот вывод dput

list(Models = c(1, 2, 3, 4, 5, 6, 7), orgId = 1, userData = list(
    list(tweets = list(list(text = "I love you", id = 78198310004451), 
        list(text = "I just got married!", id = 78198310004452), 
        list(text = "I just got a new job!", id = 88198310004453)), 
    twitterId = 70051429, include_outcome = FALSE)))```