颜色到线图/散点图

Question

以下是我试图绘制的一些测试数据。

x_vals = seq(0,6,by=.1)

df <- data.frame(lambda=rep(NA), x=rep(NA), y=rep(NA))

iter <- 1
for (lambda in seq(0,3,by=.5)){
  for (val in 1:length(x_vals)){
    x = x_vals[val]
    y = x**2 + 1 + lambda*(x**2 - 6*x + 8)
    df[iter,1] = lambda 
    df[iter,2] = x 
    df[iter,3] = y
    iter = iter + 1
  }
}

我想要的是不同lambda值的单独线条图，按颜色区分。现在我正努力让r甚至绘制多条线。

我怀疑我遗漏了一些论点或行：

ggplot(df, aes(x, y, colour=lambda)) +
  geom_point()

Answer 1

您可以执行以下操作：

ggplot(df, aes(x, y, colour=lambda)) +
    geom_point() +
    geom_line(aes(group=lambda))

或

ggplot(df, aes(x, y, colour=lambda, group=lambda)) +
    geom_point() +
    geom_line()

输出如下，根据lambda分组绘制线条。