R语言AzurStor：readRDS与storage_load_rds输出不一致如何解决

直接提取storage_load_rds返回结果的第一个元素即可：

# 读取并提取目标对象
file_dates <- storage_load_rds(cont, "file_last_dates.rds")[[1]]

# 验证输出
file_dates

执行后输出会和readRDS的结果一致：

> file_dates

$`st_rfe.mli.{year}_dek.sf.rds`
[1] "2022-12-31"

$`st_rfe.mli.{year}_day.sf.rds`
[1] "2022-12-31"

storage_load_rds函数的实现逻辑会将读取到的RDS对象额外包裹在一层列表中返回，而readRDS则直接返回文件中存储的原始命名列表。通过[[1]]索引可以穿透这层额外的列表结构，得到和readRDS完全一致的结果。

内容的提问来源于stack exchange，提问作者Billy Ray