/R/Convert all numeric columns to percentages R

Convert all numeric columns to percentages R

myfun <- function(x) {
  if(is.numeric(x)){ 
    ifelse(is.na(x), x, paste0(round(x*100L, 1), "%")) 
  } else x 
}

df1 %>% mutate_each(funs(myfun))
#   name somevariable othervariable
# 1   A1        13.4%         53.4%
# 2   A1        54.8%          <NA>
# 3   B1        36.9%         36.9%
# 4   B1         <NA>         33.3%

Source: stackoverflow.com

Similar codes

0 vote278 views1 answer
Collapse text by group in dataframe r
R
2 votes275 views1 answer
Rep in r
R
1 vote343 views1 answer
R combine strings
R
1 vote294 views1 answer
Variable assignment in r
R
0 vote276 views1 answer
R count distinct dplyr
R
9 votes385 views3 answers
Replace na with 0 in R
R
0 vote319 views1 answer
Set row names in r
R
0 vote252 views5 answers
Vlookup in r dplyr
R
5 votes406 views6 answers
Rename column in r
R
0 vote277 views1 answer
How to read multiple csv files from a directory in r
R