Bir vektördeki bir elemanın indeksini bulmak için bir R fonksiyonu var mı?

R'de bir elementim xve bir vektörüm var v. Ben bir elemanın ilk indeksini bulmak istiyorum vo eşittir x. Bunu yapmanın bir yolu olduğunu biliyorum: which(x == v)[[1]]ama bu aşırı verimsiz görünüyor. Bunu yapmanın daha doğrudan bir yolu var mı?

Bonus puanlar için, xbir vektör ise çalışan bir işlev var mı? Olduğuna göre, her bir elemanının konumunu gösteren indekslerinin bir vektör döndürmelidir xiçinde v.

Fonksiyon matchvektörler üzerinde çalışır:

x <- sample(1:10)
x
# [1]  4  5  9  3  8  1  6 10  7  2
match(c(4,8),x)
# [1] 1 5

matchsadece bir maçın ilk karşılaşmasını istediğiniz gibi döndürür. İlk bağımsız değişkendeki değerlerin ikinci bağımsız değişkenindeki konumu döndürür.

Birden fazla eşleme %in%için, gitmenin yolu:

x <- sample(1:4,10,replace=TRUE)
x
# [1] 3 4 3 3 2 3 1 1 2 2
which(x %in% c(2,4))
# [1]  2  5  9 10

%in%ilk bağımsız değişken olduğu sürece mantıksal bir vektör döndürür; TRUEbu değer ikinci bağımsız değişkende bir if ve başka bir değer bulunabilir FALSE.

Positionfunprog {base} içindeki işlev de işi yapar. İsteğe bağlı bir işlevi geçirmenize olanak tanır ve ilk veya son eşleşmeyi döndürür.

Position(f, x, right = FALSE, nomatch = NA_integer)

Yukarıda belirtilen yöntemlerin etkinliği hakkında küçük bir not:

 library(microbenchmark)

  microbenchmark(
    which("Feb" == month.abb)[[1]],
    which(month.abb %in% "Feb"))

  Unit: nanoseconds
   min     lq    mean median     uq  max neval
   891  979.0 1098.00   1031 1135.5 3693   100
   1052 1175.5 1339.74   1235 1390.0 7399  100

Yani, en iyisi

    which("Feb" == month.abb)[[1]]

R, çift eşittir ==operatörünü vektör samanlıkta bir iğnenin indeksini bulma yöntemiyle aşırı yükledi . Samanlıkta her eşleşme için değerler logicaliçeren bir vektör verir TRUE.

Misal:

haystack <- c(1, 2, 4, 3, 4)
needle <- 4
indices <- needle == haystack
indices
[1] 3  5
haystack[indices]
[1] 4  4

Her ikisi de vektörse çalışır ve birden fazla vektör kullanmak için genişletilebilir.