El valor NA
tiene la característica que trasforma en NA cualquier suma independientemente del tipo de dato de su sumando:
> c(1 + NA, Inf + NA, NA + NA, 3i + NA)
[1] NA NA NA NA
En este sentido, las funciones como rowSums()
y tantas otras tienen dos tratamientos con respecto a los NA
, lo considera o los ignora (na.rm = T
) y particularmente rowSums()
documenta el comportamiento de tu ejemplo:
If there are no values in a range to be summed over (after removing
missing values with na.rm = TRUE), that component of the output is set
to 0 (*Sums) or NaN (*Means), consistent with sum and mean.
Es decir, cuando los dos valores son NA
el retorno será 0. Por lo que si lo que buscas es que en estos caso el valor sea NA
habrá que hacer algo distinto:
apply(va, 1, function(x) ifelse(all(is.na(x)), NA, sum(x, na.rm = TRUE)))
Adenda
El comportamiento de rowSums()
guarda consistencia con el del simple sum
, dónde sum(NA, na.rm=TRUE) == 0
y yendo más lejos sum() == 0
y tiene que ver en cierta convención, aunque demostrable, para lo que se conoce como suma vacía.