タイプII(ベータ)エラー、検出力、サンプルサイズをグラフィカルに表示するにはどうすればよいですか?
統計の概要を書くように求められ、p値と検出力の関係をグラフィカルに示す方法に苦労しています。私はこのグラフを思いつきました: 私の質問:これを表示するより良い方法はありますか? ここに私のRコードがあります x <- seq(-4, 4, length=1000) hx <- dnorm(x, mean=0, sd=1) plot(x, hx, type="n", xlim=c(-4, 8), ylim=c(0, 0.5), ylab = "", xlab = "", main= expression(paste("Type II (", beta, ") error")), axes=FALSE) axis(1, at = c(-qnorm(.025), 0, -4), labels = expression("p-value", 0, -infinity )) shift = qnorm(1-0.025, mean=0, …