R语言自定义函数，利用QQ图和shaprio.test检验正态分布
代码
#自定义函数
norm.test<-function(data,alpha=0.05,pic=TRUE){ #alpha为显著性水平，这里的默认值为0.05
if(pic==TRUE){#画图形
dev.new()
par(mfrow=c(2,1))
qqnorm(data,main="qq图")
qqline(data)
hist(data,freq=F,main="直方图和密度估计曲线")
lines(density(data),col="blue")#密度估计曲线
x<-c(round(min(data)):round(max(data)))
lines(x,dnorm(x,mean(data),sd(data)),col="red")#正态分布曲线
}
sol<-shapiro.test(data)
if(sol$p.value>alpha){
print(paste("success:服从正态分布,p.value=",sol$p.value,">",alpha))
}else{
print(paste("error:不服从正态分布,p.value=",sol$p.value,"<=",alpha))
}
sol
}
#函数调用
data<-rnorm(100,mean=5,sd=3)#数据为随机生成的满足正态分布的数据集，个数为100，平均值为5，标准差为5
norm.test(data)
################
说明
1、norm是正态分布，dnorm是正态分布的概率密度函数，rnorm是生成正态分布的随机数，pnorm是分布函数
2、关于QQ图
（1）QQ图用于检验指标样本是否服从某种分布状态，样本越是服从某种分布规则，绘制的QQ图越会趋于一条直线
（2）qqnorm函数绘制正态分布的QQ图
（3）qqline函数用于绘制QQ图的近似直线，其解析式为
，其中a是正态分布的标准差，截距b为均值
3、关于shapiro.test函数
该函数的参数为要检验的数据集，返回值为一个对象，对象的属性p.value与显著性水平相比（一般与0.05相比），如果p.value值大，则可以说其服从正态分布，该值越接近1越好。
运行结果
数据分析咨询请扫描二维码
若不方便扫码，搜微信号：CDAshujufenxi
Excel是数据分析的重要工具，强大的内置功能使其成为许多分析师的首选。在日常工作中，启用Excel的数据分析工具库能够显著提升数 ...
2024-12-23在当今信息爆炸的时代，数据分析师如同一位现代社会的侦探，肩负着从海量数据中提炼出有价值信息的重任。在这个过程中，掌握一系 ...
2024-12-23在现代的职场中，制作吸引人的PPT已经成为展示信息的重要手段，而其中数据对比的有效呈现尤为关键。为了让数据在幻灯片上不仅准 ...
2024-12-23在信息泛滥的现代社会，数据分析师已成为企业决策过程中不可或缺的角色。他们的任务是从海量数据中提取有价值的洞察，帮助组织制 ...
2024-12-23在数据驱动时代，数据分析已成为各行各业的必需技能。无论是提升个人能力还是推动职业发展，选择一条适合自己的学习路线至关重要 ...
2024-12-23在准备数据分析师面试时，掌握高频考题及其解答是应对面试的关键。为了帮助大家轻松上岸，以下是10个高频考题及其详细解析，外加 ...
2024-12-20互联网数据分析师是一个热门且综合性的职业，他们通过数据挖掘和分析，为企业的业务决策和运营优化提供强有力的支持。尤其在如今 ...
2024-12-20在现代商业环境中，数据分析师是不可或缺的角色。他们的工作不仅仅是对数据进行深入分析，更是协助企业从复杂的数据信息中提炼出 ...
2024-12-20随着大数据时代的到来，数据驱动的决策方式开始受到越来越多企业的青睐。近年来，数据分析在人力资源管理中正在扮演着至关重要的 ...
2024-12-20在数据分析的世界里，表面上的技术操作只是“入门票”，而真正的高手则需要打破一些“看不见的墙”。这些“隐形天花板”限制了数 ...
2024-12-19在数据分析领域，尽管行业前景广阔、岗位需求旺盛，但实际的工作难度却远超很多人的想象。很多新手初入数据分析岗位时，常常被各 ...
2024-12-19入门数据分析，许多人都会感到“难”，但这“难”究竟难在哪儿？对于新手而言，往往不是技术不行，而是思维方式、业务理解和实践 ...
2024-12-19在如今的行业动荡背景下，数据分析师的职业前景虽然面临一些挑战，但也充满了许多新的机会。随着技术的不断发展和多领域需求的提 ...
2024-12-19在信息爆炸的时代，数据分析师如同探险家，在浩瀚的数据海洋中寻觅有价值的宝藏。这不仅需要技术上的过硬实力，还需要一种艺术家 ...
2024-12-19在当今信息化社会，大数据已成为各行各业不可或缺的宝贵资源。大数据专业应运而生，旨在培养具备扎实理论基础和实践能力，能够应 ...
2024-12-19阿里P8、P9失业都找不到工作？是我们孤陋寡闻还是世界真的已经“癫”成这样了？ 案例一：本硕都是 985，所学的专业也是当红专业 ...
2024-12-19CDA持证人Louis CDA持证人基本情况 我大学是在一个二线城市的一所普通二本院校读的，专业是旅游管理，非计算机非统计学。毕业之 ...
2024-12-18最近，知乎上有个很火的话题：“一个人为何会陷入社会底层”？ 有人说，这个世界上只有一个分水岭，就是“羊水”；还有人说，一 ...
2024-12-18在这个数据驱动的时代，数据分析师的技能需求快速增长。掌握适当的编程语言不仅能增强分析能力，还能帮助分析师从海量数据中提取 ...
2024-12-17在当今信息爆炸的时代，数据分析已经成为许多行业中不可或缺的一部分。想要在这个领域脱颖而出，除了热情和毅力外，你还需要掌握 ...
2024-12-17
