我正在尝试将列表编码为 JSON,在 Rcompression 中使用 gzip 对其进行压缩,然后使用 RCurl 中的 POST 请求将其发送到服务器。
# COMPRESS THE REQUEST
all <- list(this=1,is=2,a=3,list=4)
json <- toJSON(all)
gzip <- gzip(json)
# SEND IT TO THE SERVER
status <- postForm(SERVER_URI,data=fileUpload(contents=gzip,contentType="application/x-gzip"),style="HTTPPOST",binary=TRUE)
但是,当我尝试将数据 POST 到服务器时,出现以下错误:
Error in postForm(SERVER_URI, data = gzip) :
STRING_ELT() can only be applied to a 'character vector', not a 'raw'
我知道 gzip 数据是原始格式,而 postForm 函数不喜欢那样,但我不清楚如何解决通过 POST 请求将原始数据发送到服务器的问题。