楼主: ZL1988_wf
3210 1

[问答] 通过这个图 可以判定数据符合多元正态分布吗 [推广有奖]

  • 0关注
  • 0粉丝

小学生

85%

还不是VIP/贵宾

-

威望
0
论坛币
75 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
216 点
帖子
4
精华
0
在线时间
12 小时
注册时间
2008-7-1
最后登录
2016-3-4

楼主
ZL1988_wf 发表于 2016-1-29 17:21:22 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
如图 ,从一个5列的数据里,通过自己写的qqmultinorm函数得到的图,图中是经验分布函数的100个p值与[0,1]均匀分布的经验分布函数的比较。从这张图可以看出此数据集是多变量正态吗?

我已经用shapiro检验了,其中4个符合正态分布,1个不符合。。


贴一下这个函数的代码:
> qqmultinorm <- function(x,nproj=50,scale=T,plot.qq=F,plot.edf=F) {
+     p <- ncol(x)
+     if(scale) x <- scale(x,center=T,scale=T)
+     if(plot.qq) devAskNewPage(ask = T)
+     pvals <- NULL
+     for (i in 1:nproj) {
+         a <- rnorm(p)
+         a <- a/sqrt(sum(a^2))
+         y <- as.vector(x%*%a)
+         if (plot.qq) qqnorm(y)
+         r <- shapiro.test(y)
+         pvals <- c(pvals,r$p.value)
+     }
+     if (plot.edf) {
+         plot(ecdf(pvals),xlab="p-values",ylab="probability",
+              main=" ")
+         abline(0,1,lwd=2)
+     }
+     pvals
+ }
> r = qqmultinorm(cbind(mec,vec,alg,ana,sta),nproj=100,plot.edf = T)

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:多元正态分布 正态分布 shapiro multi 分布函数 正态分布

Rplot.png (5.27 KB)

Rplot.png

沙发
bbslover 在职认证  发表于 2016-2-3 04:59:45
try test using: "nortest" package in R.  Compare with shapiro.test() result.

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2026-1-18 08:40