R lappy拆分data.table列，并在每个列表元素中保留列名

我想为每个列表元素保留列名，以便列名是C1、C2和C3，而不是V1。是否有一种方法可以在lapplysamp、函数。。。{}

---

尝试在列名称或列索引上循环

lapply(seq_along(samp), function(i) samp[, ..i])

---

@阿克伦为我工作。请提交你的答案。谢谢为什么要这样做？@Arun我正在尝试为R中的数据分析创建一个包。在函数plot64行下，我正在尝试使用lappy而不是for循环将列名传递给aes_字符串。GitHub链接：GitHub链接已弃用。如果有人感兴趣，可在此添加新链接：

> samp_list
$C1
   C1
1:  a
2:  b
3:  c

$C2
   C2
1:  d
2:  e
3:  f

$C3
   C3
1:  g
2:  h
3:  i

lapply(seq_along(samp), function(i) samp[, ..i])