F分布のグラフ
例1. 自由度4,2のF分布
| DF<-function(x)df(x,4,2) plot(DF,0,3) |
例2. F分布の塗りつぶし指定
以下は塗りつぶしのための関数fpaint()の定義です。
| fpaint <- function(x1, x2,color) { xvals <- seq(x1, x2, length=50) dvals <- c(DF(xvals), 0, 0) xvals <- c(xvals, x2, x1) polygon(xvals, dvals, col=color) } |
もし2.0から3.0の範囲を塗りつぶすのであれば次のようにします。
| fpaint(2.0,3.0,color="pink") |
