mapcとpurrを使用してlistcolumn内にNAを割り当てます。

Question

library(tidyverse)  
k<-data_frame(u=c("A","B"),l=c(list(c(1,5,4)),list(c(7,5,1)))) 

listcolumn lの2未満のすべての値をNAに設定します。どのように私はマップを使用して、純粋な世界の中でこれを行うことができますか？

map(k$l,~.x[.x<2]<-NA) 

がエラーをスローします。

更新：

k %>% mutate(o=map(l, ~(.x[.x<2]<-NA))) 

はなく、二つの数字とlistcolumn

更新IIの各要素内の1つのNAと、私余分な列を与える： 交換してください私の友人で、トリックを行います。最終的な編集で述べたよう

k %>% mutate(o=map(l, ~replace(.x,.x<2,NA))) 

Answer 1

k %>% mutate(o=map(l, ~replace(.x,.x<2,NA))) 

- 上記comman dは私の問題を解決します。上記のコメントの提案の後に投稿されます。