сложены проценты Гистограммы ggplot2

Question

У меня есть CSV-файл с следующим форматом данные

963669136 solved lost_village desc 
948902923 rejected donations  desc 
208285984 open  lost_village desc 
208285984 solved lost_village desc 
268433965 solved lost_village desc 
464273209 open  feedback  desc 
464273209 solved feedback  desc 
2571706944 solved victory_points desc 

я приобретаю информацию следующего образом

tickets = read.csv("~/materials/minor/hw02/data/tickets_new.csv") 

Я хочу производить пакетные проценты гистограммы. Однако, я могу только получить это далеко:

ggplot() + 
geom_bar(data = game_tag, aes(x = tag, fill = status)) + 
    coord_flip() 

The Bar chart I get Как я могу сделать это проценты по у вместо подсчета. Я хочу результата ищу что-то подобное

Like that that

Любая помощь очень ценится !! Благодаря!!

Answer 1

Вы можете использовать пакет scales. Это должно работать:

library(scales) 

ggplot() + 
geom_bar(data = game_tag, aes(x = tag, fill = status), position="fill") + 
coord_flip() + 
scale_y_continuous(labels = percent_format())