Leyendo tú código, entiendo que en primer lugar estas buscando determinar si dos variables sean menores a 120. La primera observación es ¿para que un ciclo? R es un lenguaje que trabaja nativamente con vectores, lo que estás haciendo ahora es repetir 10000 veces exactamente lo mismo. Supongamos algo así:
datos <- data.frame(ANO1=sample(115:123, 100, replace = TRUE),
ANO2=sample(115:123, 100, replace = TRUE))
head(datos)
ANO1 ANO2
1 120 121
2 119 118
3 119 117
4 117 123
5 118 120
6 118 120
La forma habitual de hacer esto, es agregar una nueva variable al data.frame
:
datos$Menor120 <- ifelse(datos$ANO1 < 120 & datos$ANO2 < 120,'VERDADERO','FALSO')
head(datos)
ANO1 ANO2 Menor120
1 120 121 FALSO
2 119 118 VERDADERO
3 119 117 VERDADERO
4 117 123 FALSO
5 118 120 FALSO
6 118 120 FALSO
ifelse()
es una función vectorizada, la función de comparación <
también, asi que podemos trabajar directamente con la columna completa, el resultado de datos$ANO1 < 120 & datos$ANO2 < 120
es un vector de lógicos consistente con cada fila, el resultado final será otro vector con la cadena VERDADERO
o FALSO
también para cada fila.
¿Ahora quieres verificar otra condición? no hay más que repetir este proceso, si quieres verificar que las dos variables están dentro de un rango, puedes hacer:
datos$De0a300 <- ifelse(datos$ANO1 > 0 & datos$ANO1 < 300 &
datos$ANO2 > 0 & datos$ANO2 < 300,
'VERDADERO','FALSO')