R列表/数据帧到JSON对象数组

# 安装和加载jsonlite包
install.packages("jsonlite")
library(jsonlite)

# 创建一个R列表
my_list <- list(name = "John", age = 30, city = "New York")

# 将R列表转换为JSON对象数组
json_array <- toJSON(my_list)

# 打印JSON对象数组
print(json_array)

{"name":["John"],"age":[30],"city":["New York"]}

# 创建一个数据帧
my_df <- data.frame(name = c("John", "Alice", "Bob"),
                    age = c(30, 25, 35),
                    city = c("New York", "London", "Paris"))

# 将数据帧转换为JSON对象数组
json_array <- toJSON(my_df)

# 打印JSON对象数组
print(json_array)

[{"name":"John","age":30,"city":"New York"},
 {"name":"Alice","age":25,"city":"London"},
 {"name":"Bob","age":35,"city":"Paris"}]