r - 自身で名前を付けた引数を返す関数

Question

リストを引数として取り、リスト項目に設定された名前でこのリストを返すベースRまたはパッケージに関数はありますか? これらの行に沿ったもの：

named.list <- function(l) { names(l) <- l; l }

これはのl?ply関数に役立ちますplyr-- これらの関数は引数リストの名前を保持します。比較：

llply(c('a', 'b', 'c'), function(x) paste0('(', x, ')'))

 [[1]]
 [1] "(a)"

 [[2]]
 [1] "(b)"

 [[3]]
 [1] "(c)"

llply(named.list(c('a', 'b', 'c')), function(x) paste0('(', x, ')'))

 $a
 [1] "(a)"

 $b
 [1] "(b)"

 $c
 [1] "(c)"

score 2 · Accepted Answer

たとえば、これが必要ですか?:

ll <- c('a', 'b', 'c')
ll <- setNames(ll,ll)
 ll
  a   b   c 
"a" "b" "c"

1 に答える 1