SPSS教程姊妹篇R语言教程：正态性检验与判。。。
8月4日 拭朱砂投稿 自今日起，我推出SPSS教程，针对医学常见的资料进行统计分析。同时，由于R语言越来越多用于数据的统计分析，在推出SPSS教程的同时，这里也推出R语言教程医学研究的R语言应用，针对同样的数据，开展统计分析。
R系列教程也将包括以下内容
1。实验性定量数据统计分析策略（10篇）
2。实验性定性数据统计分析策略（5篇）
3。观察性研究统计分析策略（79篇）
4。生存分析策略（34篇）
5。影响因素研究统计分析策略（35篇）
6。混杂偏倚控制基本统计学方法（5篇）
7。复杂试验设计与统计分析方法（57篇）
本教程不再介绍R语言的软件、数据导入、整理等，如果诸位需要，可详见本公众号之前的系列：“30天学会R语言系列”（点击：R语言各类学习资源集合，欢迎学习）。
医学研究的R语言应用（1）：正态性检验
同期SPSS教程篇，已经就正态性检验，进行了详细的叙述（SPSS统计分析策略（1）：正态性检验与判断），本文采用R语言对本案例进行分析，不妨请诸位结合两篇文章一起来学习和研究。
研究实例
将出生28天的20只大鼠随机分成两组，分别饲以高蛋白和低蛋白饲料，8周后观察其体重（g）。问两种不同饲料组别的大鼠体重正态性情况如何？数据见数据库weight。sav（SPSS格式）。
高蛋白组：133，145，112，138，99，157，126，121，139，106，115
低蛋白组：118，75，106，87，94，110，102，124，130
数据导入、整理与描述
library（foreign）利用foreign直接将数据库从SPSS中导入
e1read。spss（weight。）读取数据集，形成list格式
e1as。data。frame（e1）将数据转为数据库
str（e1）浏览变量
is。factor（e1group）group变量是因子吗？
is。numeric（e1weight）group变量是数值吗？
summary（e1weight）计算中位数均数
sd（e1weight）计算标准差
table（e1group）计算分类数据的人数
分组计算均数和标准差
可借助tapply语句进行数据分析
tapply（e1weight，e1group，summary）计算中位数均数
这里可以借助于groupby函数进行
tapply（e1weight，e1group，summary）计算中位数均数
library（tidyverse）
library（dplyr）
summarise（groupby（e1，group），
meanmean（weight，na。rmT），
sdsd（weight，na。rmT），
medianmedian（weight，na。rmT））
绘制直方图
hist（e1weight，
，，体重，
体重直方图）
分别绘制两组大鼠的直方图
par（mfrowc（1，2））两幅子图在同一行显示
hist（e1weight〔e11高蛋白〕，
，，体重，
高蛋白组直方图）
hist（e1weight〔e12低蛋白〕，
，，体重，
低蛋白组直方图）
单样本正态性检验
shapiro。test（e1weight）SW方法
KS方法，spss教程的KS方法实际上是Lilliefor法校正
library（nortest）
lillie。test（e1weight）Lilliefor法
多样本正态性检验
tapply（e1weight，e1group，shapiro。test）
本文结束，如有程序有问题，请联系本人修改
meta分析
R语言
真实世界研究
统计技巧
学校布置“养蚕作业”为何招致舆论声讨据报道，每年春暖花开的四五月份，杭州市三年级学生都会被布置养蚕的“规定动作”，而找桑叶的任务，让一批杭城家长为之色变，有的孩子直接把养蚕这项“工作”交给了家长。（5月16日澎湃……
学生社会实践活动怎样做才有意义今年全国“两会”期间，一份由人大附中学生撰写的提案《进一步开展中小学节俭教育》引起不少关注。近日，提案主负责人陈潇接受媒体采访时表示，通过调查发现“76的学生在校吃饭会出现浪费……
杜绝教学管理中的“假检查”还需多方借力近日，在蒲公英评论网（http：pgy。voice。edu。cn）读到《教学管理中的“假检查”危害不小》一文。文中描述这样一个案例：教研员深入课堂，发现执教老师的教学常规项项皆……
有多少“创新作业”是家长在代劳？蒲公英评论作者刘泽溪在文章《不要让作业创新造成家庭负担》中就杭州某学校布置养蚕作业一事发表观点说，作业创新，应当考虑学生的家庭状况和个人能力。我深表认同，现在有些学校布置作业有……
备课应当成为教师的行动研究提高和完善中小学教师专业素质的途径很多，主要有理论学习、系统进修、专题培训、技能训练、岗位实践和行动研究等。长期的理论和实践研究说明，行动研究可以显著提高教师的专业素质。对于备……
不使用网络低俗语言应成为媒体共识人民网舆情监测室日前发布《2015年网络语象报告》指出，网络语言低俗化已向纸媒等传统媒体渗透，一些市场类报刊为了吸引眼球，频频使用网络低俗语言作为标题，失范之势不容小觑。这容易……
教师“紧缺”或“多余”，可能并非真问题近两年，关于教师数量的多与少，有两种截然相反的说法：一是教师太多了。如有的地方把年龄大的教师从教学岗位上分流出去，让他们当保安；有的学校让老教师离开学生、离开书本，去喂猪。二是……
【微评论】倡导见义“智”为，也不能冷落了见义勇为16年前，镇江句容12岁的小江救人溺亡。其父拿到抚恤金和救助金，但10多年来为儿子讨要荣誉证书未果。当地政府称小江当时属未成年人，不提倡未成年人见义勇为，加之事迹并不突出，因此……
“近八成室友不和”，没必要大惊小怪近日，中国高校传媒联盟随机对全国134所高校的446名大学生发放了室友关系问卷调查，其中22。42的受访者没有遇到过寝室矛盾，77。58的受访者经历过室友不和，其中3。14的受……
对学生“严字当头”，也要讲究原则和方法中国科学院院士、微电子学家陈星弼近日接受采访时说，严字当头，把学生当“敌人”，增强学生解决问题的能力是教学的重要意义所在，这是他数十载的教学感悟。（5月16日中国教育报）……
没有“神题”的招生考试体现了端正的教育方向近日，在南京某民办小学招生现场，大约20到30分钟的游戏考核结束后，有家长却提出这样的疑问：“考这么短时间，没有‘神题’孩子会被埋没的！”该校校长解释，家长圈传出的“神题”，其……
让学生打扫厕所，最好有教育设计在先“我们送孩子上学，为的是学知识，不是去洗厕所的。”近日，福州某民办小学的家长向媒体反映，他认为学校安排学生扫厕所不妥，应由保洁人员来做。校方回应，此举是为了锻炼学生劳动能力。（……
【教育影评】“池塘之底”的教育春光这是一所特殊的学校“池塘之底”，一所专为问题学生设置的寄宿制学校，一如它的名字，古堡似的建筑，重重铁链紧锁的大门，以及灰暗斑驳的教室。这里的孩子们厌学、偷盗、欺压、暴戾、叛逆，……
年味儿没有“变淡”，只是变样了很多人慨叹，如今年味儿变淡了，也变味了，似乎是人心不古或者是我们把传统文化弄丢的原因。笔者认为，这样的观点不免过于悲观、消极和伤感。其实，年味儿还在，只是不断地变化着新的……
父亲的言传身教是我们最好的家风从老家出门，不足五十米，有河名为大光河。河上立有钢筋水泥桥一座，取名“公庆桥”。公庆桥连接的水泥路可通邻镇三口，也算是一条要道。去年，公庆桥拆除重建，却在我家激起了些许波澜。……
全天候开放高校图书馆要建立长效机制教育部近日印发的《普通高等学校图书馆规程》明确，图书馆在学校教学时间内开馆每周应不低于90小时，假期也应有必要的开放时间，有条件的学校可以根据实际需要全天开放；网上资源的服务应……
“吃亏常在”的家风里有着大智慧“吃亏常在。”这是父母亲常说的一句话。他们不仅是这么说的，也是这么做的。父亲在他们那一辈年龄最小，是爷爷的“老来子”。等到父亲成家后，爷爷奶奶岁数很大了，已没有了劳动能力……
人文教育跟不上，我们就会缺少“精神免疫力”在不久前召开的2016年达沃斯世界经济论坛上，哈佛大学校长德鲁吉尔平福斯特接受媒体采访时说：“教育的目的，并不是要训练学生为了某种单一工作而努力，或者一毕业就找到工作。”他认为……
即便是“知识传授”，也不能照本宣科今天观课的内容是元杂剧《窦娥冤》，老师在课堂上出示的学习目标是：了解元杂剧都体制；掌握元杂剧的特点；学会欣赏元杂剧。但课堂实际的教学内容都没有涉及“欣赏”的层面，用三维目……
【微评论】新学校咋就有了“破房子”？最近，到一所刚刚建造的学校参观学习，听到该校校长委屈地感叹：“新学校，破房子。”原来，这所学校从规划、设计、建造到最后的验收，一直都由政府相关部门操作，根本没征求过学校的……
做了善事，自求表扬也无可厚非吉林长春一烧烤店老板张金彪8年间花了近20万元捐资助学。近日，他主动打电话给媒体求褒扬。此举引起人们热议。为啥想登报求表扬呢？张金彪说，他看过子贡赎人的典故，所以他觉得，如果人……
【创作经验谈】我为什么要写教育评论有近两周的时间没有在蒲公英评论写文章了，每天总惦记着，可总没有动笔。忙只是一个借口，不思考恐怕才是主因。今天就静下来想一想，我究竟为什么要写教育评论？最初学写评论，缘于自……
对于“累犯”的未成年人，“重教轻罚”是否适合？1月18日中午，广州番禺区一名11岁的女孩上学途中被杀害。次日，19岁的嫌犯韦某返现场时被当场抓获。经警方核查，他曾于2010年在家乡掐死一名男孩，因作案时年龄未满14周岁依法……
猝死悲剧频发，急救培训亟需重视近日，江苏监考女教师猝死事件引发热议。在为其不幸表示哀悼的同时，我们是不是应该反思如何普及急救常识，培训急救技能？在我国，有院前急救素养的人实在太少。这是导致有些原本可以……