特別な文字でリスト要素を選択する

Question

要素に付けられた特殊文字に基づいてリストをサブセット化しようとしています。私は複数の結果を見出しましたが、特殊文字を扱う方法や特殊文字を含む要素を理解する方法が不足していると思います。最後に「**」を含むすべての要素で結果を得たいと思います。私は何か助けていただきありがとうございます。似たような質問が既にあった場合はお詫びします。リストをサブセット化するときに特殊文字を扱う際の一般的な答えも高く評価されます。あなたの時間をありがとう。

例-コード：

x1 <- c('a**', 'b', 'c**') 
x2 <- c('d**', 'b', 'e**') 

y <- list(x1,x2) 

#Here are a couple of results i tried: 

grep('\\**', y, value =TRUE, ignore.case = TRUE) 

y[lapply(y, function(x) x[grep("[^\\**]", x),])] 

Filter(function(x) !any(grepl("[^\\**]", x)), y) 

y[y = "[^\\**]"] 

Answer 1

我々はfixed=TRUE

grep("**", unlist(y), value = TRUE, fixed = TRUE) 
#[1] "a**" "c**" "d**" "e**"