Question

我一直在尝试通过R使用AWS S3存储选项。我一直在使用aws.s3软件包来帮助实现这一目标。

在我尝试调出并使用我在AWS上保存的rds文件之前，一切似乎都可以进行。

通过示例：

library("aws.s3")
Sys.setenv("AWS_ACCESS_KEY_ID" = "mykey",
           "AWS_SECRET_ACCESS_KEY" = "mysecretkey",
           "AWS_DEFAULT_REGION" = "us-east-1",
           "AWS_SESSION_TOKEN" = "mytoken")

#Create Dummy Data
testdata <- rep(1:3, 10)

#Save to AWS
s3saveRDS(testdata, object = "testdata.rds", bucket = "mybucket")

#Recall from AWS
newtestdata <- get_object("testdata.rds", bucket = "mybucket")

newtestdata以原始格式返回，但是我找不到如何将其转换为原始格式。我已经尝试过诸如rawToChar()之类的事情，但遇到错误。

有关信息，这是newtestdata文件原始格式的样子：

1f 8b 08 00 00 00 00 00 00 06 8b e0 62 60 60 60 62 60 66 61 64 60 62 06 32 19 78 81 58 0e 88 19 c1 e2 0c 0c cc f4 64 03 00 62 4b 7d f5 8e 00 00 00

我应该怎么做才能将此文件转换回原始格式？

Answer 1

您可以尝试下面的代码片段按[1]中的说明读取数据，并查看它们是否与same（）匹配。

s3readRDS(object = "mtcars.rds", bucket = "myexamplebucket")
identical(mtcars, mtcars2)

将存储在AWS中的数据转换回R中的原始格式

1 个答案: