Replacing numeric NAs and 0's with blank, and all values greater than 0 with "X"

Question

I have a dataframe emissions that looks like this (example):

CEDS_Sector                    Ammonia      Carbon Dioxide     ...
1A1a_Public Electricity         2528             NA
1A1b_Pet_refining               NA               NA
1A1c_Coke-ovens                 0.000           1467
...

CEDS_Sector is a factor, and all other columns are numeric. If there is an NA or 0 entry, I want that cell to become blank. If there is a > 0 value, I want that cell to have an "X" in it, to look like this"

CEDS_Sector                    Ammonia      Carbon Dioxide     ...
1A1a_Public Electricity           X             
1A1b_Pet_refining              
1A1c_Coke-ovens                                   X
...

score 2 · Accepted Answer · answered Jul 29 '20 at 21:03

2

You can do this with mutate_if():

library(dplyr) 

emissions %>% 
  mutate_if(is.numeric, function(x) ifelse(is.na(x) | x == 0, 
                                           "",
                                           "X"))

answered Jul 29 '20 at 21:03

CzechInk

443
2
13

thank you! I always forget about `mutate_if()` – Maridee Weber Jul 29 '20 at 21:05

Replacing numeric NAs and 0's with blank, and all values greater than 0 with "X"

1 Answers1