将fromJSON列表转换为数据框

Question

我正在使用blsAPI软件包从BLS网站获取数据。

代码是：

library(blsAPI)
employ <- blsAPI(payload= "CES0500000001")
emp <- fromJSON(employ)

数据集emp是list ...这就是我的困惑之处。我一直在尝试所有类型的变体，从emp到data.frame到list的转换都没有成功。

Answer 1

只需设置return_data_frame = TRUE函数的参数blsAPI。将返回data.frame而不是list（默认行为）。

library(rjson)
library(blsAPI)
response <- blsAPI("CES0500000001", return_data_frame = TRUE)
head(response)

输出：

  year period periodName  value      seriesID
1 2018    M08     August 126939 CES0500000001
2 2018    M07       July 126735 CES0500000001
3 2018    M06       June 126582 CES0500000001
4 2018    M05        May 126390 CES0500000001
5 2018    M04      April 126130 CES0500000001
6 2018    M03      March 125956 CES0500000001