特定の条件に基づいて行を削除する方法 - r、format、delete-row

データセットには、10000を超える携帯電話番号を持つ列が含まれています。また、特定の形式のガベージ値も含まれています。 正しい携帯電話番号を持つ行のみを保持するにはどうすればいいですか

セル番号............コメント

9674544444 ...............

9453453455 ............... c

asd..as23 ..................... d

サスE2 ................... d

232dsasd .................... ,,,,,,,,,,,,,, 23 ,,,,, 231

必要なテーブル

セル番号............コメント

9674544444 ...............

9453453455 ............... c

回答：

このような;

df<-read.table(header=T,sep="|",text="cell number|comment
9674544444|a
9453453455|c
asd..as23|d
as sas E2|d
232dsasd|23,,,,,231")

df[grep("[0-9]{10}",df$cell.number),]

#  cell.number comment
#1  9674544444       a
#2  9453453455       c