ggplot2 折线图给出“geom_path：每组仅包含一个观察值。您需要调整组美学吗？”

使用此数据框（“df”）：

year pollution
1 1999 346.82000
2 2002 134.30882
3 2005 130.43038
4 2008  88.27546

我尝试创建一个像这样的折线图：

  plot5 <- ggplot(df, aes(year, pollution)) +
           geom_point() +
           geom_line() +
           labs(x = "Year", y = "Particulate matter emissions (tons)", title = "Motor vehicle emissions in Baltimore")

我得到的错误是：

geom_path：每组仅包含一个观察值。你需要吗 调整群体审美？

尽管我想要折线图，但图表显示为散点图。我尝试更换geom_line() with geom_line(aes(group = year))但这没有用。

在一个答案中，我被告知将年份转换为因子变量。我这样做了，问题仍然存在。这是的输出str(df) and dput(df):

'data.frame':   4 obs. of  2 variables:
 $ year     : num  1 2 3 4
 $ pollution: num [1:4(1d)] 346.8 134.3 130.4 88.3
  ..- attr(*, "dimnames")=List of 1
  .. ..$ : chr  "1999" "2002" "2005" "2008"

structure(list(year = c(1, 2, 3, 4), pollution = structure(c(346.82, 
134.308821199349, 130.430379885892, 88.275457392443), .Dim = 4L, .Dimnames = list(
    c("1999", "2002", "2005", "2008")))), .Names = c("year", 
"pollution"), row.names = c(NA, -4L), class = "data.frame")

你只需要添加group = 1进入 ggplot 或 geom_line aes()。

对于折线图，必须对数据点进行分组，以便它知道要连接哪些点。在这种情况下，很简单——所有点都应该连接，所以 group=1。当使用较多变量并绘制多条线时，通常通过变量来对线进行分组。

参考：R 食谱，章节：图表 Bar_and_line_graphs_(ggplot2)，折线图。 http://www.cookbook-r.com/Graphs/Bar_and_line_graphs_(ggplot2)/

尝试这个：

plot5 <- ggplot(df, aes(year, pollution, group = 1)) +
         geom_point() +
         geom_line() +
         labs(x = "Year", y = "Particulate matter emissions (tons)", 
              title = "Motor vehicle emissions in Baltimore")