Question

我遇到的问题是ggplot()的图例没有出现。这是我的代码：

plot_bt <- ggplot(NULL, aes(x, v1)) + 
  geom_line(data = nig_bt_1, colour = "black") +
  geom_line(data = nig_bt_2, colour = "blue") +
  geom_line(data = nig_bt_3, colour = "red") + 
  labs(x = "X", y = "Probability")

我试图在此图表中制作一个图例，但我无法做到。它只是没有出现。我尝试绘制三种不同类型的NIG分布图。在nig_bt_1等我有我的价值观。这三个密度出现但传说没有。我也尝试了scale_color_manual功能但没有成功。

非常感谢。

x <- seq(-7.5,7.5,0.001)
nig_bt_1 <- data.frame(x ,v1 = dnig(x, param = pr_bt_1))
nig_bt_2 <- data.frame(x ,v1 = dnig(x, param = pr_bt_2))
nig_bt_3 <- data.frame(x ,v1 = dnig(x, param = pr_bt_3))

Answer 1

这样做：

plot_bt <- ggplot(NULL, aes(x, v1)) + 
  geom_line(data = nig_bt_1, aes(colour = "a")) +
  geom_line(data = nig_bt_2, aes(colour = "b")) +
  geom_line(data = nig_bt_3, aes(colour = "c")) + 
  labs(x = "X", y = "Probability") +
  scales_color_manual(values= c("a" = "black", "b" = "blue", "c" = "red"))

指南只能描述您使用aes定义的映射。 ggplot2方式当然首先要合并数据并使用分组变量。

ggplot2中的其他图例

1 个答案: