R语言完整代码，绘制泊松分布 P(4)、P(6)，P(8)的比较图

在R语言中，你可以使用`dpois()`函数来计算泊松分布的概率密度，然后结合`plot()`函数创建一个图形。首先需要安装并加载`ggplot2`包，它提供了一种更美观的方式来画图。以下是完整的代码：

# 安装并加载必要的库
if (!require("ggplot2")) {
  install.packages("ggplot2")
}
library(ggplot2)

# 设置泊松分布的参数lamda
lambda <- c(4, 6, 8)

# 计算对应的概率密度值
densities <- dpois(x = seq(0, max(lambda), by = 1), lambda = lambda)

# 创建数据框，将数值和对应的概率密度放入同一行
data <- data.frame(values = seq(0, max(lambda), by = 1),
                   pois_4 = densities[1],
                   pois_6 = densities[2],
                   pois_8 = densities[3])

# 绘制图形
ggplot(data, aes(x = values)) +
  geom_line(aes(y = pois_4, color = "Poisson(4)"), linetype="dashed") +
  geom_line(aes(y = pois_6, color = "Poisson(6)")) +
  geom_line(aes(y = pois_8, color = "Poisson(8)")) +
  labs(title = "Poisson Distribution Comparison for λ=4, 6, and 8",
       x = "Values", y = "Probability Density",
       color = "") +
  theme_minimal() +
  guides(color = guide_legend(nrow = 1))

# 展示图形