R десятичная запятая вместо десятичной точки в ggplot scales::percent

Я пытался заставить R печатать , вместо . в процентных метках моего графика, но это не работает ни с одним из методов, которые я нашел до сих пор. Подозреваю, что бег

format(data, decimal.mark=",") или options(OutDec= ",") могут не работать, потому что я прошу распечатать проценты из label=scales::percent(Prozent/100). Я пытался использовать какой-то paste(Prozent+"%") в качестве обходного пути, но смысл остается. :(

plot <- ggplot(probleme, aes(x=reorder(Name, Häufigkeit), y= Häufigkeit, fill = mean)) +
          geom_col(position="dodge") +
          coord_flip() + 
          scale_fill_gradient(low = "#FEDFE8",  high = "#AC0634", limits=c(6,8), breaks = c(6,7,8))+
          scale_y_continuous(limits = c(0,1650), expand = c(0,0.1))+
          scale_x_discrete(expand = c(0,0)) + 
          geom_text(aes(label=scales::percent(Prozent/100)), 
                 position = position_dodge(0.5), hjust = -0.02, colour = "black", size=5)

Где в моем коде я могу указать, что мне нужна десятичная запятая? Любая помощь будет оценена :) Спасибо


person clarulatta_elphadora    schedule 08.02.2021    source источник


Ответы (1)


Добавьте decimal.mark = "," к команде geom_text(), чтобы изменить символ запятой.

geom_text(aes(label=scales::percent(Prozent/100,decimal.mark = ",")), 
                 position = position_dodge(0.5), hjust = -0.02, colour = "black", size=5)
person pascal    schedule 08.02.2021