0

Thre1、、、、、という名前のリストが 10個Thre2ありThre3ます。...Thre10

出力の i 番目の要素がi入力リストの th 要素と交差するように、出力もリストにする必要があります。たとえば、次のようになります。

output[[1]] = Reduce(intersect, 
                     list=(Thre1[[1]],Thre2[[1]],Thre3[[1]],...,Thre10[[1]])

手入力を繰り返さないようにコードを書くにはどうすればよいThrei[[j]]ですか?

4

1 に答える 1

1

すべてのリストの長さが同じであると仮定します。

lapply(1:length(Thre1), function(i)
   Reduce(intersect, list(Thre1[[i]], ..., Thre10[[i]])))
于 2012-11-15T14:16:40.707 に答える