Нет атрибута, влияющего на цвет текста флажка на уровне темы.
Все, что вы можете сделать, чтобы изменить цвет текста, - это определить стиль, как показано ниже, и применить его к флажку с помощью атрибута style.
Большинство функций, предназначенных для работы с векторами, также принимают матрицы, но возвращают вектор вместо матрицы: paste
, sprintf
и т. д. Вы можете использовать apply
, который вернет матрицу.
apply(
prop.table(m,1)*100,
2,
function(u) sprintf( "%.1f%%", u )
)
Другим решением может быть замена содержимого матрицы:
m2 <- m
m2[] <- sprintf("%.1f%%",round(prop.table(m,1)*100, 3))
m2
# C D
# A "25.0%" "75.0%"
# B "33.3%" "66.7%"
Существует пакет под названием janitor
, который заботится о проблеме prop.table()
«format-as-percent». Вот ссылка на пакет: https://github.com/sfirke/janitor
Вот пример использования на странице github.
roster %>%
tabyl(employee_status, full_time) %>%
adorn_totals("row") %>%
adorn_percentages("row") %>%
adorn_pct_formatting() %>%
adorn_ns() %>%
adorn_title("combined")
#> employee_status/full_time No Yes
#> Administration 0.0% (0) 100.0% (1)
#> Coach 100.0% (2) 0.0% (0)
#> Teacher 33.3% (3) 66.7% (6)
#> Total 41.7% (5) 58.3% (7)