2
私はRコードHERE on R-Fiddleの部分を成功させようとしています。コードはRで非常にスムーズに実行されますが、全く実行されませんHERE on R-Fiddle?コードはRで正常に実行されますが、R-Fiddleでは失敗します。なぜですか?
アドバイスはありがとうございます。
alt.hyp = function(N, d){
options(warn = -1) ; d = sort(d)
df = N - 1 ; d.SE = 1/sqrt(N) ; ncp.min = min(d)*sqrt(N) ; ncp.max = max(d)*sqrt(N)
min.d = d.SE*qt(1e-5, df, ncp.min) ; max.d = d.SE*qt(0.99999, df, ncp.max)
for(i in 1:length(d)){
H = curve(dt(d[i]*sqrt(N), df, x*sqrt(N)), min.d, max.d, n = 1e3, xlab = "Effect Size",
ylab = NA, ty = "n", add = i!= 1, bty = "n", yaxt = "n", font.lab = 2)
polygon(H, col = adjustcolor(i, .7), border = NA)
text(d[i], max(H$y), bquote(bolditalic(H[.(i-1)])), pos = 3, xpd = NA)
axis(1, at = d[i], col = i, col.axis = i, font = 2)
segments(d[i], 0, d[i], max(H$y), lty = 3)
}
}
# Example of use:
alt.hyp(N = 30, d = seq(0, 2, .5))
あなたは、フォーマット以外の何を変えたのですか? –
@BenBolkerは、 "="を "< - "、1行に1つのステートメント(これ以上は ";")に置き換えませんでした - それは –
@BenBolker私はしません** R **が直接解析することができるいくつかの不可視のシンボルを削除すると驚くかもしれませんが、何とかR-FiddleのこのWebインターフェイスでは何か違うものと解釈できません。 –