valores - eliminar fila con valor nan

eliminar un elemento en r

Question

Digamos, por ejemplo, tengo estos datos:

data <- c(1,2,3,4,5,6,NaN,5,9,NaN,23,9)
attr(data,"dim") <- c(6,2)
data
[,1] [,2]
[1,] 1 NaN
[2,] 2 5
[3,] 3 9
[4,] 4 NaN
[5,] 5 23
[6,] 6 9

Ahora quiero eliminar las filas con los valores de NaN: filas 1 y 4. Pero no sé dónde están estas filas, si es un conjunto de datos de más de 100.000 filas, así que necesito encontrarlas con una función y eliminarlas. la fila completa

¿Alguien puede señalarme en la dirección correcta?

Answer 1

DATOS

data <- matrix(rnorm(100000000), ncol=10000)
idx <- sample(1:10000,100)
idy <- sample(1:10000,100)
data[idx,idy] <- NaN

FUNCIÓN

foo <- function(d=data) d[apply(d,2,function(x) any(is.nan(x))),]

RUNTIMES

> system.time(data[complete.cases(data),])
user system elapsed
3.53 0.12 3.65
> system.time(foo(data))
user system elapsed
2.37 0.09 2.46

Answer 2

La función complete.cases le dirá dónde están las filas que necesita:

data <- matrix(c(1,2,3,4,5,6,NaN,5,9,NaN,23,9), ncol=2)
data[complete.cases(data), ]
[,1] [,2]
[1,] 2 5
[2,] 3 9
[3,] 5 23
[4,] 6 9