差分
このページの2つのバージョン間の差分を表示します。
両方とも前のリビジョン前のリビジョン | 最新のリビジョン両方とも次のリビジョン | ||
r:maintenance:hardtime [2018/12/10 09:17] – [時間取り替え] watalu | r:maintenance:hardtime [2018/12/10 09:17] – [確率分布の密度関数と生存関数] watalu | ||
---|---|---|---|
行 87: | 行 87: | ||
< | < | ||
# 確率密度関数 | # 確率密度関数 | ||
- | f <- function(x) { | + | f = function(x) { |
return(model$d(x, | return(model$d(x, | ||
} | } | ||
行 95: | 行 95: | ||
< | < | ||
# 生存関数 | # 生存関数 | ||
- | F.bar <- function(x) { | + | F.bar = function(x) { |
return(1-model$p(x, | return(1-model$p(x, | ||
} | } |