如何获得带有评论的页面的Facebook帖子？

Question

如何获得页面的Facebook帖子及其对我的网页的评论？ 我在侧边栏的http://rudaw.net/english中看到了此代码，他们为此应用了自定义样式：

我看到了Facebook的图形，即页面之一的JSON：

    {
       "id": "411891885531368",
       "about": "\u0626\u0627\u0645\u0627\u0646\u062c\u0645\u0627\u0646 \u062e\u0632\u0645\u0647\u200c\u062a \u06a9\u0631\u062f\u0646\u06cc \u0626\u06ce\u0648\u0647\u200c\u06cc\u0647\u200c",
       "can_post": false,
       "category": "Computers/internet website",
       "checkins": 109,
       "cover": {
          "cover_id": 693427407377813,
          "offset_x": 0,
          "offset_y": 0,
          "source": "https://scontent-b.xx.fbcdn.net/hphotos-xpa1/t1.0-9/s720x720/10501938_693427407377813_8236762689196644851_n.png"
       },
       "description": "\u0633\u06d5\u0631\u062f\u0627\u0646\u06cc \u0645\u0627\u06b5\u067e\u06d5\u0695\u06cc \u06a9\u06ce\u0634\u06d5\u06cc \u06a9\u0648\u0645\u067e\u06cc\u0648\u062a\u06d5\u0631 \u0628\u06a9\u06d5:\n\nhttp://www.pkurd.com/ku/",
       "has_added_app": false,
       "is_community_page": false,
       "is_published": true,
       "likes": 358257,
       "link": "https://www.facebook.com/computer.problem1",
       "name": "\u0643\u06cc\u0634\u0629\u06cc \u0643\u06c6\u0645\u067e\u06cc\u0648\u062a\u0629\u0631",
       "parking": {
          "lot": 0,
          "street": 0,
          "valet": 0
       },
       "phone": "07503085828",
       "talking_about_count": 658972,
       "username": "computer.problem1",
       "website": "http://www.pkurd.com/ku/",
       "were_here_count": 0
    }

我想像rudaw一样获得此页面的帖子和评论，该怎么做？

Answer 1

我知道如何使用R做到这一点。 您必须安装软件包Rfacebook 。 然后使用功能：

x<-getPage(page="pagename",token = access_token, n = no. of posts)

这将提供所有帖子和帖子ID。 现在使用功能

y<-getPost(post = x$id[1], n = number of comments and likes, token = access_token)

您可以使用循环来获取所有注释。