我想生成一条损耗超标曲线，代码为：
x <- rpois (10000, 3) * rlnorm (10000, 100,10)
number_sequence = seq(0.1,1,0.1)
for (i in number_sequence)
{
y <- quantile (log(x), c(i))
plot (y,i)
}
我得到了10张分开的图表。信息是正确的，但我需要在同一张图表中有10个数据点来绘制一条曲线，如(10%，85(，(20%，91(。。(100%，141(。我没能制作出一个矩阵来在最后绘制。
我很乐意从技术上解释R.中风险量化的公式是如何工作的
我得到了10个单独的图表，而不是一个有10个数据集的图表。
y <- c()
for (i in number_sequence)
{
y <- c(y,quantile (log(x), c(i)))
}
plot(y,number_sequence)
或更快：
y <- quantile(log(x),number_sequence)
plot(y,number_sequence)