Чи існує функція R для знаходження індексу елемента у векторі?

У R у мене є елемент xі вектор v. Я хочу знайти перший індекс елемента, vякий дорівнює x. Я знаю, що один із способів зробити це:, which(x == v)[[1]]але це здається надмірно неефективним. Чи є більш прямий спосіб це зробити?

Чи існує бонусна очка функція, яка працює, якщо xце вектор? Тобто він повинен повертати вектор індексів, що вказують положення кожного елемента xв v.

Функція matchпрацює на векторах:

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

matchповертає лише першу зустріч матчу, як ви просили. Він повертає позицію у другому аргументі значень першого аргументу.

Для кращого узгодження %in%- це спосіб:

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%повертає логічний вектор до тих пір, як перший аргумент, при цьому, TRUEякщо це значення можна знайти у другому аргументі та в FALSEіншому випадку.

функція Positionу funprog {base} також виконує свою роботу. Це дозволяє передавати довільну функцію та повертає першу чи останню відповідність.

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

Невелика примітка про ефективність вищезазначених методів:

 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

Отже, найкращий

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

R перевантажив ==оператора подвійних рівних методом знаходження індексу голки у векторній копиці сіна. Він дає logicalвектор, що містить TRUEзначення для кожного сірника в копиці сіна.

Приклад:

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

Він працює, якщо обидва є векторами, і їх також можна розширити, щоб використовувати також декілька векторів.