not - rstudio logical operators

R: Tratar con TRUE, FALSE, NA y NaN

Question

Aqui hay un vector

a = c(T,F,F,NA,F,T,NA,F,T)

Me gustaría una función simple que devuelva VERDADERO cada vez que haya un VERDADERO en a y Falso cada vez que haya una Falso o una NA en a .

Las 3 cosas siguientes no funcionan.

a == T
identical(T,a)
isTRUE(a)

Aquí hay una solución.

a[-which(is.na(a))]

Pero no parece ser una solución directa y sencilla.

¿Hay otra solución?

Aquí hay algunas funciones (y operadores) que conozco:

identical()
isTRUE()
is.na()
na.rm()
&
|
!

¿Cuáles son las otras funciones (operadores, consejos, lo que sea, ...) que son útiles para tratar con TRUE, FALSE, NA, NaN?

y finalmente...

¿Cuáles son las diferencias entre NA y NaN?

¿Hay otras "cosas lógicas" que T, F, NA y NaN?

Muchas gracias !

Answer 1

Así que quieres que TRUE permanezca VERDADERO y FALSO para que permanezca FALSO, el único cambio real es que NA debe convertirse en FALSO, así que haz este cambio como:

a[ is.na(a) ] <- FALSE

O puede reformular para decir que es VERDADERO si es VERDADERO y no falta:

a <- a & !is.na(a)

Answer 2

Me gusta la función is.element:

is.element(a, T)

Answer 3

No es necesario envolver nada en una función: los siguientes trabajos

a = c(T,F,NA)

a %in% TRUE

[1]  TRUE FALSE FALSE

Answer 4

Para responder a sus preguntas en orden:

1) El operador == no trata las NA como usted esperaría. Una función muy útil es esta función r-cookbook.com de r-cookbook.com :

  compareNA <- function(v1,v2) {
    # This function returns TRUE wherever elements are the same, including NA''s,
    # and false everywhere else.
    same <- (v1 == v2)  |  (is.na(v1) & is.na(v2))
    same[is.na(same)] <- FALSE
    return(same)
   }

2) NA significa "No disponible" y no es lo mismo que el NaN general ("no es un número"). NA se usa generalmente para un valor predeterminado para que un número represente los datos faltantes; Los NaN normalmente se generan debido a un problema numérico (registro de -1 o similar).

3) No estoy realmente seguro de lo que quiere decir con "cosas lógicas": muchos tipos de datos diferentes, incluidos los vectores numéricos, se pueden usar como entrada para operadores lógicos. Puede intentar leer la página de operadores lógicos R: http://stat.ethz.ch/R-manual/R-patched/library/base/html/Logic.html .

¡Espero que esto ayude!

Answer 5

Si tomas la sugerencia de Ben Bolker arriba, puedes configurar tu propia función siguiendo la sintaxis de is.na ()

is.true <- function(x) {
  !is.na(x) & x
}

a = c(T,F,F,NA,F,T,NA,F,T)

is.true(a)
[1]  TRUE FALSE FALSE FALSE FALSE  TRUE FALSE FALSE  TRUE

Esto también funciona para la subcontratación de datos.

b = c(1:9)
df <- as.data.frame(cbind(a,b))

df[is.true(df$a),]

  a b
1 1 1
6 1 6
9 1 9

Y ayuda a evitar la incorporación accidental de filas vacías donde NA existe en los datos.

df[df$a == TRUE,]

      a  b
1     1  1
NA   NA NA
6     1  6
NA.1 NA NA
9     1  9