用数字名称获取列表中的元素

Question

这可能是重复的，但是我在任何地方都找不到答案...

无论如何，这是我的简单问题。我正在使用用户元数据在R中加载yaml文件。用yaml::yaml.load_file解析yaml后，列表如下所示：

$users
$users$`1`
$users$`1`$user
[1] "Alice"


$users$`2`
$users$`2`$user
[1] "Bob"

我可以通过以下方式获得ID = 1的用户：

user_list$users$`1`$user

返回：

[1] "Alice"

我的问题是：如何将数字1转换为此“带引号”的版本，以便可以将id作为函数参数传递，以检索所需的用户？

Answer 1

使用$代替使用[[

id <- 1
user_list$users[[as.character(id)]]$user