R语言t检验

自己整理编写的R语言常用数据分析模型的模板，原文件为Rmd格式，直接复制粘贴过来，作为个人学习笔记保存和分享。

I.单样本t检验

例1. 有原始数据的t检验

已知某水样中含碳酸钙的真值为20.7mg/L，现用某法重复测定该水样12次，碳酸钙的含量分别为..问该法测定碳酸钙含量所得的均值与诊治有无显著差异？

x <- c(20.99,20.41,20.10,20.00,20.91,22.60,20.99,20.42,20.90,22.99,23.12,20.89)
t.test(x, alternative = "greater", mu = 20.7 )

检验结果为t=1.5665，显著性P值=0.07276>0.05，接受原假设，说明该法测定的碳酸钙含量与总体无显著差异。

例2. 无原始数据的t检验

健康成年男子脉搏均数为72次/分。某医生在某山区随机抽查健康成年男子25人，其脉搏均数为74.2次/分，标准差为6.5次/分。根据这个资料能否认为某山区健康成年男子脉搏数与一般健康成年男子的不同？

#根据公式算出t值
x <- 74.2
mu <- 72
thita <- 6.5
n <- 25
t <- (x-mu) / (thita/sqrt(n))   #或者用n-1代替n
t
#用pt()函数，输入t值和自由度df（n-1），得到p值
p <- pt(t,df=24