如何将Zoho Analytics与R连接以实现从Zoho向R提取数据？

准备工作 #

• 登录Zoho Analytics控制台，进入目标工作区的「设置」→「API访问」，生成并保存你的授权令牌（Auth Token），同时记下工作区ID（Workspace ID）和目标数据表ID（Table ID）。

用R的httr包调用Zoho Analytics API #

1. 安装并加载依赖包 #

先安装处理HTTP请求和JSON解析的工具包：

install.packages(c("httr", "jsonlite"))
library(httr)
library(jsonlite)

2. 编写代码提取全表数据 #

把你拿到的授权令牌、工作区ID和表ID替换进去：

# 替换成你的实际参数
auth_token <- "你的Zoho授权令牌"
workspace_id <- "你的工作区ID"
table_id <- "你的数据表ID"

# 构建API请求地址
request_url <- paste0("https://analyticsapi.zoho.com/api/", workspace_id, "/", table_id)

# 发送GET请求
api_response <- GET(request_url,
                    add_headers("Authorization" = paste("Zoho-oauthtoken", auth_token)),
                    query = list("ZOHO_OUTPUT_FORMAT" = "JSON"))

# 处理响应结果
if (status_code(api_response) == 200) {
  # 解析JSON数据转成R数据框
  raw_data <- content(api_response, "text")
  extracted_data <- fromJSON(raw_data)$data
  cat("数据提取成功！前5行数据如下：\n")
  print(head(extracted_data))
} else {
  cat("请求失败，状态码：", status_code(api_response), "\n")
}

3. 自定义SQL查询提取数据 #

如果只需要特定数据，可以用SQL查询来过滤：

# 替换成你的SQL语句
custom_sql <- "SELECT 列1, 列2 FROM 你的表名 WHERE 条件"

# 发送POST请求执行SQL
sql_response <- POST(request_url,
                     add_headers("Authorization" = paste("Zoho-oauthtoken", auth_token)),
                     body = list("ZOHO_SQL_QUERY" = custom_sql, "ZOHO_OUTPUT_FORMAT" = "JSON"),
                     encode = "form")

# 解析查询结果
if (status_code(sql_response) == 200) {
  sql_data <- fromJSON(content(sql_response, "text"))$data
  cat("SQL查询结果：\n")
  print(head(sql_data))
}

注意事项 #

• 确保授权令牌拥有目标数据表的读取权限，否则会返回权限错误。
• 数据量较大时，可在请求参数中添加page和per_page进行分页获取，避免请求超时。

内容的提问来源于stack exchange，提问作者Jai Vaidya