Подсчитать минимальные значения в векторе, где минимальные значения расположены в последовательном порядке

Question

Как гласит заголовок, и это, вероятно, очень просто, но как подсчитать количество минимальных значений в векторе или, более конкретно, в подмножестве векторов:

Ниже приведен пример:

a <- c(1,1,1,2,2)

так что я хочу, чтобы вывод был равен 3 (так как есть три 1)

Answer 1

Вы можете использовать table, т.е.

table(a)[1]
#1 
#3 

или Если вы хотите отменить его,

unname(table(a)[1])
#[1] 3

Answer 2

Вы можете использовать == для получения логического вектора, sum() затем подсчитывает число TRUE в логическом векторе.

sum(a == min(a))
# [1] 3

Answer 3

Мы можем использовать tabulate

tabulate(a)[1]
#[1] 3