在R中生成概率分布函数(PDF)的问题

# 生成正态分布的概率密度函数
x <- seq(-5, 5, length=100)
mu <- 0
sigma <- 1
pdf <- dnorm(x, mean=mu, sd=sigma)
plot(x, pdf, type="l", main="正态分布的概率密度函数")

# 生成均匀分布的概率密度函数
x <- seq(0, 1, length=100)
min <- 0
max <- 1
pdf <- dunif(x, min=min, max=max)
plot(x, pdf, type="l", main="均匀分布的概率密度函数")

# 生成指数分布的概率密度函数
x <- seq(0, 5, length=100)
rate <- 1
pdf <- dexp(x, rate=rate)
plot(x, pdf, type="l", main="指数分布的概率密度函数")

# 生成泊松分布的概率密度函数
x <- 0:20
lambda <- 5
pdf <- dpois(x, lambda=lambda)
plot(x, pdf, type="l", main="泊松分布的概率密度函数")