r - 如何在两个因子变量之间绘制多条线

Question

我正在尝试用 R 生成一种特定类型的图表。

)

这是我试图获得的图表的描述:
x 轴上的变量(“日期”)是一个因子。其水平在 x 轴上报告。
y 轴(“主题”)上的变量也是一个因子，绘制的是每个“日期”级别的计数比例。

例如，让我们考虑这个数据库:

    data <- data.frame(ID = 1:20, Date = as.factor(c(1,1,1,1, 1, 1,1, 2,2,2,2, 2, 2, 2, 2, 3,3,3, 3, 3)), Theme = as.factor(c("a","b", "b", "c", "c", "c", "c","a","a","a", "a", "b","c", "c","a","a","b","b", "b", "c")))

在 R 中，我设法生成了一个堆叠条形图，计算每个日期的主题值的比例:

    ggplot(data, aes(x = Date)) + geom_bar(aes(fill = Theme), position = 'fill')

我的目标是为每个 x 轴级别(“日期”)生成水平连接的三条线，y 轴变量(“主题”)的计数比例。

我在网上找到了一种可行的方法，但我没有设法使它们起作用。

    ggplot(Theme, aes(Date)) + geom_freqpoly(aes(group = Theme, colour = Theme))

(我在这里找到了这个公式: http://docs.ggplot2.org/0.9.3.1/geom_bar.html 第 13 个图基本上就是我要找的。)

谢谢你的帮助!

Answer 1

对于您的数据，最接近的近似值如下所示:

ggplot(data, aes(x=Date, y=ID, group=Theme, col=Theme)) + geom_line() + geom_point()

至于日期，更好的方法是使用标准的 POSIXct 或 Date 类，它们可以通过相同的 ggplot 表达式进行可视化，并且可以通过添加 scale_x_date() 或 scale_x_datetime 函数进一步自定义轴。