г Индекс находки минимумов с зазором/расстоянием условием

Question

list <- c(1,1,1,4,5,6,9,9,2) 

Хочу найти индекс 3 минимальных значений, но с условием, что индекс найденных минимумов составляет по меньшей мере 3 очка друга от друга. Чтобы найти 3 низкие показатели я использую

which(list <= sort(list, decreasing=FALSE)[3], arr.ind=TRUE) 

, который не ищет каких-либо условий и результатов в

1,2,3

Мой желаемый результат

1,9,4

Я хочу знать, возможно ли это сделать без каких-либо циклов, так как мой список намного больше.

Большое вам спасибо.

Чтобы уточнить, что я имел в виду: показатели минимумов должны всегда находиться на определенном расстоянии. Например, для списка list<-c(1,3,9,5,9,9,2) результатом минимумов должен быть 1,7,4. Не 1,7,2, потому что индексы 1 и 2 слишком близки друг к другу. Еще раз спасибо за помощь.

Answer 1

Попробуйте это с помощью dplyr: создать dataframe с последовательностью во 2-м столбце, а затем отсортировать и найти первый

вхождение

library(dplyr) 

kk <- data.frame(cbind(list, seq=seq_along(list))) %>% 
    arrange(list) %>% # sort list 
    group_by(list) %>% # group 
    summarise(V3=min(seq)) %>% # find first occurance 
    .$V3 %>% # get sequence values 
    head(3) # get top 3 

[1] 1 9 4