我有以下列表与子列表，我想找出每个子列表中的位置＆gt; 1，并列出与结果相同的结构列表。
google-api-[your_language]-client我已尝试在函数中嵌入函数并使用mapply如下，但是我收到错误。
L <- list ( list( c ( 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 ,139 , 1 , 1 ,139 , 1 ,139 ,139 , 1 ,139 ,139 ,139 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1) , c( 1 ,3 ,1 ,1 ,3 ,1 ) , c( 74 ,74 ,1 ,74 ,74 ,74 ,1 ,1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 ,74 , 1 , 1 ,74 , 1 ,74 ,74 ,1) , c( 7 ,7 ,7 ,1 ,1 ,1, 1, 1, 1, 1, 1 ,1)) , list ( c ( 1 ,1 ,139, 1 ,1 ,139 ,1 ,1 ,139 , 1 , 1 ,139 , 1 , 1 ,139 , 1 , 1 ,139 ,139 , 1 ,139 , 1 , 1 ,139 , 1 , 1 ,139 , 1 , 1 ,139), c( 1 ,1 ,3 ,1 ,1 ,3 ) , c( 1 , 1 ,74 ,74 , 1 ,74 ,1 , 1 ,74 , 1 , 1 ,74 , 1 , 1 ,74 , 1 , 1 ,74 , 1 , 1 ,74 ,74 , 1 ,74) , c( 7, 1, 7, 1, 1, 7, 1, 1, 7, 1, 1, 7 )) , list ( c ( 1 ,128 ,1 ,1 ,128 ,1 ,128 ,128 ,1 ,128 ,128 ,128 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 , 1 ,128, 1) , c( integer(0) ), c( integer(0) ) , c( integer(0) ) , c( integer(0) ) , c( integer(0) )) , list (c( 1 ,1 ,128 ,1 ,1 ,128 ,128 ,1 ,128 ,128 ,1 ,128 ,1 ,1 ,128 ,1 ,1 ,128 ,1 ,1 ,128 ,1 ,1 ,128 ) , c( integer(0) ), c( integer(0) ) , c( integer(0) ) , c( integer(0) ) , c( integer(0) )))
欢迎任何帮助
答案 0 :(得分：4)
也许你想要
rapply(L, function(x) which(x>1), how = "list")