r - R は、do.call、lapply、または mapply を使用してベクトルのリストからサブ選択しますか?

Question

私は次のデータを持っています。xはベクトルindicesのリストで、インデックスのリストです。

x = list(c("a", "b", "c", "a"), c("b", "x", "a", "c"))
indices = list(c(1, 2), c(3, 4))

私がやりたいことは、リスト内で表される各ベクトルをステップスルーしx、そのベクトルに基づいてそのベクトルからサブ選択することindicesです。したがって、期待される結果は

a,b
a,c

で試してみましたmapply

> mapply('[',x,indices)
     [,1] [,2]
[1,] "a"  "a" 
[2,] "b"  "c" 

しかし、それは私がやりたいことをしていません。ポインタはありますか？前もって感謝します。