如何将JSON格式的aata保存到R对象中

我有一个JSON格式的数据字符串，我只是想把它保存为一个数据帧。以下是我的JSON数据：

newobject <- 
{
  "data": [
    {
      "links": [
        {
          "rel": "self",
          "href": "https://api.nike.com/v1/me/sport/activities/8102000000014097347280007666912117966998"
        }
      ],
      "activityId": "8102000000014097347280007666912117966998",
      "activityType": "RUN",
      "startTime": "2015-07-25T13:27:52Z",
      "activityTimeZone": "America/Anguilla",
      "status": "COMPLETE",
      "deviceType": "SPORTWATCH",
      "metricSummary": {
        "calories": "1012",
        "fuel": "3338",
        "distance": "13.059499740600586",
        "steps": "0",
        "duration": "1:05:27.000"
      },
      "tags": [],
      "metrics": []
    }
  ],
  "paging": {
    "next": "/v1/me/sport/activities/RUNNING?count=1&access_token=Qr7kEcwD6bpfxy2mJ1yH8uGBGfdY&offset=2",
    "previous": null
  }
}
)

---

newobject首先，您必须在R中将对象定义为字符串，只需使用简单的引号

newobject <- 
'{
  "data": [
    {
      "links": [
        {
          "rel": "self",
          "href": "https://api.nike.com/v1/me/sport/activities/8102000000014097347280007666912117966998"
        }
        ],
      "activityId": "8102000000014097347280007666912117966998",
      "activityType": "RUN",
      "startTime": "2015-07-25T13:27:52Z",
      "activityTimeZone": "America/Anguilla",
      "status": "COMPLETE",
      "deviceType": "SPORTWATCH",
      "metricSummary": {
        "calories": "1012",
        "fuel": "3338",
        "distance": "13.059499740600586",
        "steps": "0",
        "duration": "1:05:27.000"
      },
      "tags": [],
      "metrics": []
    }
    ],
  "paging": {
    "next": "/v1/me/sport/activities/RUNNING?count=1&access_token=Qr7kEcwD6bpfxy2mJ1yH8uGBGfdY&offset=2",
    "previous": null
  }
}'

然后，如果运行
df$data
则会得到data.frame.
末尾有一个不匹配的括号，这是可疑的。外部大括号之间的JSON是有效的。我不认为这个问题离题了。这是关于将json对象转换为R中的data.frame。为什么这会是一个“简单的印刷错误”？感谢您的回复。我现在在尝试将此保存到.csv时遇到问题。这是我的代码：
df
library(jsonlite)
df <- fromJSON(newobject)