VECTORES II. Comparación y lógica

##############################################
###   Vectores II - Comparacíon y lógica   ###
##############################################


# Los principales símbolos para comparar son >,>=,<,<=,==,!=

araña = c(2,1,5,3,4,9,9,7,5,5,4,7,5,6,3,1,4,7,1,2)
araña == 2 # Decimos a R que nos diga de todas las muestras, cuales tienen dos arañas y cuales no.
which (araña==2) # ¿Qué muestras tienen 2 arañas?
mean(araña)
which (araña>=(mean(araña))) # ¿Qué muestras están por encima de la media? POSICIONES
mayor.media = which (araña>=(mean(araña)))
araña[mayor.media] # VALORES
sum (araña>=(mean(araña))) # ¿Cuántas muestras están por encima de la media?


# Los símbolos para valores logicos son "&" (ampersand ) y, "|" (pipe) o, "!" no

My2yMn6 = which(araña>2 & araña<6) # ¿Qué muestras tienen más de 2 arañas, pero menos que 6?
My2yMn6
araña[My2yMn6]

Mn2oMy6 = which(araña<2 | araña>6) # ¿Qué muestras tienen menos que 2 o más de 6 arañas?
Mn2oMy6
araña[Mn2oMy6]

MyIg5noMy8 = which(araña>=5 &! araña>8)
MyIg5noMy8
araña[MyIg5noMy8]

# Si al cabo de un rato trabajando vemos en nuestras notas que la muestra 9 tenía 6 arañas
# aunque al escribirlo en el cuaderno de campo el número se podía confundir con un 5 y te entra la
# duda de si lo has introducido bien.

araña[9]   # Podemos preguntar a R cual es el noveno componente del objeto/vector "araña".

araña[9]=6 # Reemplazamos el valor de la novena muestra. Ahora es 6. No es necesario introducir
        # todos los datos nuevamente.
araña[9]   # Lo comprobamos

araña[21]   # Al preguntar por el vigésimo primero, la consola nos muestra NA "Not Avaliable",
# es decir, que no está disponible o no existe.

araña[21] = 8 # Introducimos el número 8 en la vigésimo primera posición del vector.
araña # Lo comprobamos

# No es necesario volver a escribir todos los comandos, nos vamos a la línea 14
# y corremos de nuevo el script.

pulgon=c(5,9,6,2,4,7,8,2,1,7,6)

comment(araña) = "Muestras de araña de la finca de Juan"
comment(pulgon) = "Muestras de pulgón de la finca de Luis"
comment(araña)
comment(pulgon)