我正在尝试将列表编码为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)
但是,当我尝试将数据发布到服务器时,出现以下错误:
Error in postForm(SERVER_URI, data = gzip) :
STRING_ELT() can only be applied to a 'character vector', not a 'raw'
我理解gzip数据是原始格式,而postForm函数不喜欢这样,但我不清楚如何解决通过POST请求将原始数据发送到服务器的问题。