R - 李克特堆积条形图

Question

我是R的新手。 我已经查看了几个关于如何在R中制作李克特堆叠条形图的网站(以及这个网站上的一个问题(。 我一个都不明白。 每个示例都有无数的命令。 就好像他们通过包含他们能想到的所有可能的属性来向我展示如何绘制，而我想要的只是一个答案：plot(x，y(

为简单起见，假设我的数据有 2 个问题，在 3pt 李克特量表(A、B 和 C(上，以 CSV 形式排列，如下所示：

        A    B    C
  Q1   25   31   56
  Q2   73   19    4

这些数字表示用该回答回答问题的人数。例如，对于问题 #2,19 人选择了李克特回答 B。

可以从中创建堆叠条形图的最短命令数量是多少？

Answer 1

这应该可以让您了解以下步骤：

Question <- c("Q1", "Q2")
A <- c(25,73)
B <- c(31,19)
C <- c(56,4)

data <- data.frame(Question, A, B, C)

# Install the "reshape" package
install.packages("reshape")
# Load reshape package into working directory
library(reshape)
# Melt data to long format
data.melt <- melt(data, id = ("Question"), measure.vars = c("A", "B", "C"))
# Install ggplot2 package
install.packages("ggplot2")
# Load ggplot2 package into working directory
library(ggplot2)
# Create your figure
ggplot(data.melt, aes(x = Question, y = value, fill = variable)) +
    geom_bar(stat = "identity")