noNameTed's questions

Assim como a pergunta diz. Existe uma maneira mais rápida de fazer o que é feito abaixo quando o tamanho do vetor é muito grande (> 10M entradas) usando a base R?

O código abaixo funciona, mas quando o tamanho do vetor cresce, ele se torna lento por razões que deveriam ser óbvias. Neste exemplo em particular, um loop for pode ser mais rápido, mas se o primeiro valor NA estiver muito longe do início do vetor, talvez não...

set.seed(1)
x <- c(rep(NA, 3), sample(c(T,F), size=5e7, replace=T))
min(which(!is.na(x))) #4

Suponha que você tenha um vetor numérico xe um data frame dfcom colunas starte stop. Existe uma maneira inteligente de retornar um vetor lógico com comprimento igual a xindicando se x está em pelo menos um intervalo definido por startou stop?

O caso real com o qual estou trabalhando tem length(x)>> nrow(df). A maneira ingênua de fazer isso seria usar um loop for, mas eu esperava algo mais elegante e que rodasse rápido.

 x <- 1:10
df <- data.frame(start = c(0, 4.5, 6), stop = c(1, 5.5, 8.5))
z <- rep(FALSE, length(x))

for(i in 1:nrow(df)){
  z <- z | (df$start[i] <= x & x <= df$stop[i])
}

x[z] # 1 5 6 7 8