Uji apakah vektor berisi elemen yang diberikan

518

Bagaimana cara memeriksa apakah vektor berisi nilai yang diberikan?

r vector r-faq

— medriscoll
sumber

38

kadang-kadang saya bertanya pada diri sendiri mengapa R tidak menggunakan kata berisi untuk memudahkan pengguna

— greg121

12

pertimbangkan bahwa "dalam" terkandung dalam "conta (in) s"; Saya berpendapat bahwa "dalam" adalah pesaing yang sangat singkat dalam konteks ini

— hedgedandlevered

1

Mungkin dengan penambahan %tanda-tanda yang ada. Kata itu inadalah kata khusus dalam R yang digunakan dalam konstruksi for-loop.

— IRTFM

@ greg121 dplyr sudah memiliki fungsi berisi , tetapi digunakan untuk tujuan yang berbeda: untuk memilih kolom dalam bingkai data. Sebagai contoh select(iris, contains("etal")).

— Paul Rougieux

Apakah ada cara ringkas untuk melakukannya untuk bilangan bernilai nyata dengan presisi yang diberikan?

— mlt

500

Kedua match()(kembali penampilan pertama) dan %in%(kembali Boolean) fungsi dirancang untuk ini.

v <- c('a','b','c','e')

'b' %in% v
## returns TRUE

match('b',v)
## returns the first location of 'b', in this case: 2

— medriscoll
sumber

bagaimana dengan mendapatkan semua penampilan, bukan hanya yang pertama?

— StatsSorceress

Mungkin saya datang agak terlambat. which(v, 'b'). Pikirkan urutan argumennya.

— Niklas Mertsch

Anda which(v, 'b')memberi saya pesan kesalahan:> Kesalahan di mana (v, 'b'): argumen ke 'yang' tidak logis

— Capt.Krusty

176

is.element() membuat kode lebih mudah dibaca, dan identik dengan %in%

v <- c('a','b','c','e')

is.element('b', v)
'b' %in% v
## both return TRUE

is.element('f', v)
'f' %in% v
## both return FALSE

subv <- c('a', 'f')
subv %in% v
## returns a vector TRUE FALSE
is.element(subv, v)
## returns a vector TRUE FALSE

— Justin Nafe
sumber

6

Saya tahu kata dokumentasi itu is.element(x, y) is identical to x %in% y. Tapi, saya tidak tahu mengapa, is.elementsbekerja ketika mencampur bilangan bulat dan angka dan %in%tidak

— pomber

@pomber: Bisakah Anda memberikan contohnya?

— Disiplin

@ pelanggan apakah sudah diperbaiki?

— vasili111

2

Keterbacaan superior is.element()vs %in%subyektif. Sebuah kasus dapat dibuat bahwa operator infiks lebih mudah dibaca karena menghilangkan ambiguitas dalam urutan argumen. apple in fruitmasuk akal, fruit in appletidak. is.element(apple, fruit)atau is.element(fruit, apple)keduanya bisa benar tergantung pada implementasi is.elementfungsi.

— rileymcdowell

70

Saya akan mengelompokkan opsi berdasarkan output. Asumsikan vektor berikut untuk semua contoh.

v <- c('z', 'a','b','a','e')

Untuk memeriksa keberadaan:

%di%

> 'a' %in% v
[1] TRUE

apa saja()

> any('a'==v)
[1] TRUE

is.element ()

> is.element('a', v)
[1] TRUE

Untuk menemukan kejadian pertama:

pertandingan()

> match('a', v)
[1] 2

Untuk menemukan semua kejadian sebagai vektor indeks:

yang()

> which('a' == v)
[1] 2 4

Untuk menemukan semua kejadian sebagai vektor logis :

==

> 'a' == v
[1] FALSE  TRUE FALSE  TRUE FALSE

Sunting: Menghapus grep () dan grepl () dari daftar karena alasan yang disebutkan dalam komentar

— ishandutta2007
sumber

6

Seperti yang sudah dikomentari di sini dan di sini , jangan gunakan grep()atau ekspresi reguler untuk menemukan kecocokan yang tepat.

— Uwe

69

Fungsi any () membuat kode dapat dibaca

> w <- c(1,2,3)
> any(w==1)
[1] TRUE

> v <- c('a','b','c')
> any(v=='b')
[1] TRUE

> any(v=='f')
[1] FALSE

— Dan Goldstein
sumber

9

Sadarilah ini berperilaku berbeda dari %in%: any(1==NA)pengembalian NA, di mana 1 %in% NApengembalian FALSE.

@ user3603486: any(1==NA, na.rm=TRUE)kembali FALSE.

— AkselA

36

Anda dapat menggunakan %in%operator:

vec <- c(1, 2, 3, 4, 5)
1 %in% vec # true
10 %in% vec # false

— ars
sumber

19

Juga untuk menemukan posisi elemen "yang" dapat digunakan sebagai

pop <- c(3,4,5,7,13)

which(pop==13)

dan untuk menemukan elemen-elemen yang tidak terkandung dalam vektor target, orang dapat melakukan ini:

pop <- c(1,2,4,6,10)

Tset <- c(2,10,7)   # Target set

pop[which(!(pop%in%Tset))]

— Armin
sumber

whichsebenarnya lebih disukai kadang-kadang karena memberi Anda semua posisi yang cocok (sebagai array), tidak seperti match. Meskipun ini mungkin bukan apa yang diminta OP, tidak seperti stackoverflow.com/questions/1169388/...

— Fizz

2

Mengapa repot-repot dengan whichjika Anda hanya ingin menemukan elemen yang tidak ada Tset? Anda bisa poplangsung mengindeks ; pop[!pop%in%Tset]

— Pengurus rumah tangga

13

Saya sangat suka grep () dan grepl () untuk tujuan ini.

grep () mengembalikan vektor bilangan bulat, yang menunjukkan tempat yang cocok.

yo <- c("a", "a", "b", "b", "c", "c")

grep("b", yo)
[1] 3 4

grepl () mengembalikan vektor logis, dengan "BENAR" di lokasi yang cocok.

yo <- c("a", "a", "b", "b", "c", "c")

grepl("b", yo)
[1] FALSE FALSE  TRUE  TRUE FALSE FALSE

Fungsi-fungsi ini peka terhadap huruf besar-kecil.

— ojdajuiceman
sumber

10

Secara default, gunakan grepekspresi reguler sebagai elemen pertama, jadi untuk melakukan pencocokan yang tepat untuk "b", gunakan ^e$atau tambahkan , fixed=TRUE).

— reinierpost

10

Jangan gunakan regex untuk pencocokan tepat. Ini berbahaya dan dapat memiliki hasil yang tidak terduga

— David Arenburg

9

Ya, ini adalah ide yang buruk, tidak baik, sangat buruk - tidak efisien dan dijamin akan rusak. Misalnya myvar <- 'blah'; grepl('b', myvar, fixed=TRUE)akan kembali TRUEwalaupun 'b' tidak ada myvar.