高校数学の質問スレ(医者・東大卒専用) Part438 (899レス)
高校数学の質問スレ(医者・東大卒専用) Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
852: 132人目の素数さん [sage] 2025/05/25(日) 10:38:10.59 ID:P4nhnL8B HDI_discrete <- function(prob_data, credMass) { x = prob_data[, 1] p = prob_data[, 2] n = length(x) sp = sort(p, index.return = TRUE) i = sp$ix[seq(n, 1, -1)] ps = p[i] xs = x[i] cp = cumsum(ps) ii = 1:n j = ii[cp >= credMass] j = j[1] achieved_credMass = cp[j] hdi_set = sort(xs[1:j]) v = list(credMass = achieved_credMass, set = hdi_set) return(v) } http://rio2016.5ch.net/test/read.cgi/math/1723152147/852
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 47 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.010s