一次选择列表中的一项

Question

有没有办法一次 select 列表中的一个项目？ 我已经尝试使用 get() function 进行此操作，但我没有任何运气。 我的列表中有 3537 个字符项。 我想一次 select 一个字符项，在使用该项时运行一组代码，然后在 for 循环中移动到另一个。 什么可能是实现这一目标的有效方法？

l <- dbListTables(mydb)

random_tables <- sample(3537, 300, replace = TRUE)
plot_list <- vector('list', 300)

for (i in seq_along(random_tables)){
# Reads the selected table in database
ind <- dbReadTable(mydb, get(l))
# Other code...
...
}

Answer 1

如果l是表的名称，您可以执行以下操作：

l <- dbListTables(mydb)

random_tables <- sample(l, 300)
plot_list <- vector('list', 300)

for (i in seq_along(random_tables)){
  # Reads the selected table in database
  ind <- dbReadTable(mydb, random_tables[i])
  # Other code...
  #...
}