API-интерфейс Graph и синтаксический анализ данных с использованием R - PullRequest
Новая
       46

API-интерфейс Graph и синтаксический анализ данных с использованием R

0 голосов
/ 20 февраля 2020

Я пытаюсь экспортировать комментарии Facebook в фрейм данных, используя Graph API Facebook, а затем r json, чтобы проанализировать их в фрейме данных. Вот что я использую: 

url <- "https://graph.facebook.com/v5.0/me?fields=posts%7Bcomments.limit(100)%7D&access_token=EAAPDCrZCBdoUBACM9OSGxq3E1IgtFmAQEtlu5VWiYZAwzDU43ZArMxRdzy8FkNW8aOLY4mVZC2jvNlf9JLjSHJE0CGaenFHPnQysZBZBZCYnccNvwBp5n4HrZApLd9svFJu7LE1KJdnBeuJOsP1gU9kRUZBNKP1rSmgxz9VFcY1Ag62mZBlqH4bXF5uXxpCiZB4PM5rHjhaiS73WoJuegFn3x4S"
d <- getURL(url)
j <- fromJSON(d)

, и тогда я получаю следующую ошибку: 

  Error in fromJSON(d) : unexpected character: i

Любая помощь будет высоко ценится

Я использовал то же самое Команды с пакетом RJSONIO, и теперь я получаю следующую ошибку: 

 Error in fromJSON(content, handler, default.size, depth, allowComments,  : 
 invalid JSON input

, где d равно: 

`{"posts": {
    "data": [
      {
        "comments": {
          "data": [
            {
              "created_time": "2020-01-25T16:48:03+0000",
              "message": "I love all kind of art and paintings. However 19 thousand dollars for a painting is entirely too much!!. ",
              "id": "1579832716452874_1373756966159579"
            },
            {
              "created_time": "2020-01-25T15:21:29+0000",
              "message": "The wind blows a piece of paper and lands next to your house. You unravel it, \"Hey hope you are having a nice day!\"...",
              "id": "1579832716452874_1373704542831488"
            }
          ]
        }
      }
    ]
  }
}`
...