r - 如何使用 if 函数在 r 中创建随机损失样本

Question

我目前正在为一个学校项目生成一些随机数据。

我使用二项分布在 R 中创建了一个变量，以确定观察是否有损失 yes=1 或 not=0。之后，我尝试使用随机分布为所有已经有损失（= 1）的观察结果生成损失量。

由于我的损失金额是一个百分比，它可以在 0 之间的任何地方

在第三步中，我正在寻找一个 if 语句，它结合了我的两个变量。

请在下面找到我的代码（仅适用于 Loss_Y_N 变量）：

Loss_Y_N = rbinom(1000000,1,0.01)
Loss_Amount = dbeta(x, 10, 990, ncp = 0, log = FALSE)

理想情况下，我可以将两者结合成类似的东西

if(Loss_Y_N=1 then Loss_Amount=dbeta(...) #... is meant to be a random variable with mean=0.15 and should be 0<x=<1
else Loss_Amount=0)

任何输入高度赞赏！

score 0 · Accepted Answer

为您的损失比例创建一个向量。用从 beta 中提取的数据填充与损失相对应的元素。调整 beta 的参数，直到获得所需的结果。

N <- 100000
loss_indicator <- rbinom(N, 1, 0.1)
loss_prop <- numeric(N)
loss_prop[loss_indicator > 0] <- rbeta(sum(loss_indicator), 10, 990)

1 回答 1