R与F分布(1) 概率密度函数

F分布: F分布是以统计学家R.A.Fisher姓氏的第一个字母命名的.
F分布的用途:用于方差分析、协方差分析和回归分析等。
(一)F分布定义
设X、Y为两个独立的随机变量,X服从自由度为m的卡方分布,Y服从自由度为n的卡方分布,这2 个独立的卡方分布被各自的自由度除以后的比率这一统计量的分布即F=(x/m)/(y/n)服从自由度为(m,n)的F-分布, 上式F服从第一自由度为m,第二自由度为n的F分布

(二)F分布的性质
  1、它是一种非对称分布;

  2、它有两个自由度,即n -1和m-1,相应的分布记为F( n –1, m-1), n –1通常称为分子自由度, m-1通常称为分母自由度;

  3、F分布是一个以自由度n –1和m-1为参数的分布族,不同的自由度决定了F 分布的形状。
其概率密度函数为:[img]http://upload.wikimedia.org/math/8/3/1/8314e1dcc7cb3033a2ca641d5dbfee22.png[/img]
其中d1和d2为正整数,B是Beta函数(beta function)


set.seed(1000)
x<-seq(0,5,length.out=1000)
y<-df(x,1,1,0)

plot(x,y,col="red",xlim=c(0,5),ylim=c(0,1),type='l',
xaxs="i", yaxs="i",ylab='density',xlab='',
main="The F Density Distribution")

lines(x,df(x,1,1,2),col="green")
lines(x,df(x,2,2,2),col="blue")
lines(x,df(x,2,4,4),col="orange")

legend("topright",legend=paste("df1=",c(1,1,2,2),"df2=",c(1,1,2,4)," ncp=", c(0,2,2,4)), lwd=1, col=c("red", "green","blue","orange"))


结果如下:

[img]http://dl2.iteye.com/upload/attachment/0103/4486/d7d2cb87-3b62-3d1d-9474-ca4348353867.png[/img]
  • 0
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
根据概率密度函数绘制图形是R语言中常见的操作。你可以使用不同的函数来计算和绘制概率密度函数图形。例如,你可以使用`dt()`函数来计算并绘制t分布的概率密度图,使用`df()`函数来计算并绘制F分布的概率密度图,使用`dchisq()`函数来计算并绘制卡方分布的概率密度图。同时,你可以使用`plot()`函数来创建一个新的图形,并使用`lines()`函数来添加额外的线条。下面是一个示例代码,演示了如何使用R语言根据概率密度函数绘制图形: ```R # 绘制t分布概率密度图 x1 <- seq(-5,5,0.0001) y1 <- dt(x1,1) y2 <- dt(x1,10) y3 <- dt(x1,30) # 绘制F分布概率密度图 x2 <- seq(0,6,0.05) y4 <- df(x2,10,25) y5 <- df(x2,10,5) # 绘制卡方分布概率密度图 x3 <- seq(0,25,0.5) y6 <- dchisq(x3,1) y7 <- dchisq(x3,5) y8 <- dchisq(x3,15) # 创建新的图形 png("D:/Rwork/Picture/概率密度图.png",width=760,height = 480) # 绘制t分布曲线 plot(x1,y3,xlab="概率密度函数",ylab="Density",type="l",col="red",wd=1.6,main="概率密度图") lines(x1,y2,lwd=1.6,type="l") lines(x1,y1,lwd=1.6,type="l",col="blue") abline(v=0) # 绘制F分布曲线 plot(x2,y4,xlab="概率密度函数",ylab="Density",type="l",col="red",lwd=1.6,main="概率密度图") lines(x2,y5,lwd=1.6,type="l") # 绘制卡方分布曲线 plot(x3,y6,xlab="概率密度函数",ylab="Density",type="l",col="red",lwd=1.6,main="概率密度图") lines(x3,y7,lwd=1.6,type="l") lines(x3,y8,lwd=1.6,type="l",col="blue") dev.off() ```

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值