我尝试使用aws.s3
R软件包下载我知道存在且包含twitter流数据的JSON文件。
要查找我的所有密钥,我使用以下代码:
library(aws.s3)
Sys.setenv("AWS_ACCESS_KEY_ID" = "my_key",
"AWS_SECRET_ACCESS_KEY" = "my_secret_access_key",
"AWS_DEFAULT_REGION" = "us-west-2")
bucket <- get_bucket('my_bucket',max = Inf)
keys <- c()
for(i in seq(1:length(bucket))){
keys[i] <- bucket[[i]]$Key
}
然后我尝试使用以下方法从其中一个键中获取json文件:
get_object(keys[n], bucket = 'my_bucket')
我没有返回错误或我的json文件,而是获得了182,858个看似随机的两位数字符的列表,如下所示:
[1] 3c 3f 78 6d 6c 20 76 65 72 73 69 6f 6e 3d 22 31 2e 30 22 20 65 6e 63 6f 64 69 6e 67 3d 22 55 54 46 2d 38 22 3f
[38] 3e 0a 3c 45 72 72 6f 72 3e 3c 43 6f 64 65 3e 4e 6f 53 75 63 68 4b 65 79 3c 2f 43 6f 64 65 3e 3c 4d 65 73 73 61
[75] 67 65 3e 54 68 65 20 73 70 65 63 69 66 69 65 64 20 6b 65 79 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2e 3c
...
我是否错误地使用此包裹?关于如何做得更好的任何提示?
答案 0 :(得分:1)
托马斯·李珀在推特上回答了这个问题,但是有人来看这个案子:
响应对象以“原始”向量的形式返回,因此需要将其包装在rawToChar()
中,或在检索后传递给fromJSON()
。