1
と名前でリスト要素を交換してください。は、私は、文字列の次のリストを持っている別のリスト
check.digits <- function(x){ grepl('^(\\d+)$' , x) }
l.1
に適用された場合、それは数字と文字列のみを返します:
l.2 = lapply(l.1[check.digits(l.1)], as.numeric)
> l.2
$b
[1] 111
$d
[1] 222
l.2
業者によってl.1
の要素を交換するためにどのように私は別の質問hereからインポート機能を使用していますことを行うために、 ?
望ましい結果は次のようになります。
> l.1
$a
[1] "aaa"
$b
[1] 111
$c
[1] "a1a"
$d
[1] 222
'L.1 [名前(L.2)] <使用することができます - l.2' –
それが動作します。ありがとう! – mattek
論理的なインデックス付け、つまり 'all_digit < - check.digits(l.1); l.1 [all_digit] < - lapply(l.1 [all_digit]、as.numeric) ' – Benjamin