如何在小图R上绘制指数函数？

Question

所以我有一个以y轴为对数（频率）的小节。 单看，似乎条形指数下降，但是我想肯定知道这一点。 我还想在该图上绘制指数。 因此，如果我的柱线下降到指数以下，我会知道我的柱线以指数方式下降或比指数下降快，并且如果柱线位于指数顶部，我会知道它们不会以指数方式下降。 如何在条形图上绘制指数？

这是我的图表，如果有帮助的话：

Answer 1

如果要拟合指数函数的密度，则可能应绘制密度直方图（而不是频率）。 有关如何在R中绘制分布的信息，请参见此问题 。

这就是我要做的。

x.gen <- rexp(1000, rate = 3)
hist(x.gen, prob = TRUE)

library(MASS)
x.est <- fitdistr(x.gen, "exponential")$estimate

curve(dexp(x, rate = x.est), add = TRUE, col = "red", lwd = 2)

Answer 2

目视检查两个分布是否相同的一种方法是使用分位数-分位数图或简称QQ图。 通常，这是在检查分布是否符合标准正态分布时完成的。

基本思想是根据一些理论分位数绘制数据，如果与该分布相匹配，您将看到一条直线。 例如：

x <- qnorm(seq(0,1,l=1002))  # Theoretical normal quantiles
x <- x[-c(1, length(x))]  # Drop ends because they are -Inf and Inf
y <- rnorm(1000)  # Actual data. 1000 points drawn from a normal distribution
l.1 <- lm(sort(y)~sort(x))
qqplot(x, y, xlab="Theoretical Quantiles", ylab="Actual Quantiles")
abline(coef(l.1)[1], coef(l.1)[2])

在理想条件下，根据数据绘制理论分位数时，您应该会看到一条直线。 因此，您可以按照您认为将要遵循的指数函数对数据进行绘制。