创建具有增加方差的向量

Question

下面的手绘图显示了对泊松回归拟合值绘制的残差。

如何创建两个向量，在绘制时，显示与附图中相同的模式？

请注意，拟合值无关紧要（因此没有比例）。

Answer 1

使y的标准偏差成为x的增加函数：

x <- runif(100, 0, 10)
y <- rnorm(100, 0, x)
plot(x,y)

Answer 2

这是我的尝试（将Stata代码从http://www.econometricsbysimulation.com/2012/11/modeling-heteroskedasticity.html翻译为R）：

set.seed(123)

# Let's generate a sample data set that has heteroskedasticity in z.
z  <- runif(1000)*5

# This means the standard deviation on u is 18 plus 16*z (which has a mean of 2.5)
u  <-  ((18+16*z))*rnorm(1000)

# Plot
plot(z, u)

Answer 3

您可以采用序列，采用序列的正弦值，然后将其乘以序列本身。

a = seq(1:1000)
b = sin(a) * a
plot(b)

您将拥有一个向量，该向量的方差增大。您可以使用它来创建时间序列或其他任何您喜欢的时间。