我有風數據用於執行極值分析(計算回報水平)。我正在使用R,套件包括'evd','extRemes'和'ismev'。威布爾分佈的置信區間
我裝修GEV,岡貝爾和Weibull分佈,以便估計回報水平(RL)的一些週期T
對於極值分佈和岡貝爾情況下,我可以使用極端得到RL的和置信區間:: return.level()函數。
一些代碼:
require(ismev)
require(MASS)
data(wind)
x = wind[, 2]
rperiod = 10
fit <- fitdistr(x, 'weibull')
s <- fit$estimate['shape']
b <- fit$estimate['scale']
rlevel <- qweibull(1 - 1/rperiod, shape = s, scale = b)
## CI around rlevel
## ci.rlevel = ??
不過對於韋伯的情況下,我需要一些幫助,從而生成CI的。
你已經提供了一個粗略的描述你做了什麼,但這是一個編碼論壇,你需要發佈數據和代碼。 – 2013-03-26 15:46:23
添加代碼,謝謝。 – Fernando 2013-03-26 15:53:52