R语言-配对T检验【程】

excel中整理数据

R语言-配对T检验【程】 - 瑞麟 - 瑞麟医生

另存为

R语言-配对T检验【程】 - 瑞麟 - 瑞麟医生

R语言界面

HVA<-read.table(file=file.choose(),header=T)
chaHVA<-HVA$preHVA-HVA$postHVA
t.test(chaHVA,alternative="greater")

============直接输入

x<-c(20.15,24.07,15.23,21.24,25.54,26.57,19.12,14.64,21.6,16.98)
y<-c(4,1.65,7,1.5,4,5.69,13,4.53,1.2,0.1)
t.test(x-y,alternative="greater")
One Sample t-test
data: x - y
t = 8.5903, df = 9, p-value = 6.239e-06
alternative hypothesis: true mean is greater than 0
95 percent confidence interval:
12.78001 Inf
sample estimates:
mean of x
16.247

=======================