Skip to content
Prev 59132 / 398502 Next

Changing zeros to NAs in a data frame

On Tue, 16 Nov 2004, Laura Holt wrote:

            
myDF <- data.frame(a=0:4, b=letters[1:5], c=-2:2)
myDF[] <- lapply(myDF, function(x) if(is.numeric(x)) {x[x==0] <- NA; x} else x)
a b  c
1 NA a -2
2  1 b -1
3  2 c NA
4  3 d  1
5  4 e  2