Флажки визуализации Barplot

Question

Я должен составить отчет об опросе, в котором у нас есть такой вопрос (все ответы - флажки).

What is you favorite cake(s) (please choose more than one):
[] Tiramisù
[] Carrot Cake
[] Cupcake

Затем программное обеспечение опроса экспортируется в CSV следующим образом:

"username","likes_tiramisu","likes_carrotcake","likes_cupcake"
"test01",1,1,1
"test02",0,1,1
"test03",0,1,0
"test04",0,0,1

Я хотел бы составить график, где каждая гистограмма представляет частоту каждого торта.Как я могу объединить таблицу следующим образом:

"likes_tiramisu"  "likes_carrotcake"  "likes_cupcake"
               1                   3                3

Могу ли я просто решить ее с суммой всех элементов в каждом столбце?Это концептуально верно?

Answer 1

Предположим, ваши данные находятся в файле: survey.csv

Затем для создания барплота используйте следующие команды:

#Read in the data
d = read.table("survey.csv", sep=",", header=TRUE)

#Need to skip the username column, so d[,2:4]
#Use apply to calculate the totals in your table
barplot(apply(d[,2:4], 2, sum))

НТН

Answer 2

A ggplot2 подход будет выглядеть так:

library(ggplot2)

data.melt <- melt(data, id = "username")
qplot(variable, value, data = data.melt, geom = "bar", stat = "identity")