3

R の ks 関数に問題があります。ラプラス分布があります。

ldes <- function(y, a) {
  if(y < 0.5) 1/a*log(2*y, 2) 
  else  1/a*log(2*(1-y), 2)
}
a <- 1
set.seed(1)
y = runif(1000, 0, 1)
ld <- ldes(y, a)

したがって、ks テストを実行する必要がありますが、そこにあるはずの 2 番目のパラメーターについては何も見つかりません。

ks.test(my_lnorm, **plnorm**, mean = -5, sd = 5)

対数正規分布または:

ks.test(my_log, **plogis**, location = 2, scale = 3)

物流配送用

ありがとう。

4

1 に答える 1