/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 vote117 views1 answer
R difference | and ||
R
0 vote129 views1 answer
Add column value based on row index r
R
1 vote126 views1 answer
Add column in r
R
0 vote123 views2 answers
R tibble select rows containing string
R
0 vote131 views1 answer
Repeat each value in a vector in r
R
1 vote129 views1 answer
R calculate for bias
R
1 vote120 views1 answer
Suppress error r
R
0 vote166 views1 answer
Reorder columns in r
R
1 vote136 views1 answer
How to re-arrange weekdays in r
R
1 vote144 views1 answer
Scale between 0 and 1 r
R