常用统计方法总结和R语言实现

分组统计

#分组统计标准差
sd=aggregate(df$Var,by=list(df$group),FUN=sd)
#分组统计均值
mean=aggregate(df$Var,by=list(df$group),FUN=mean)

ANOVA

anova=aov(df$Var1~df$Var2)
summary(anova)
  • 这的的df就是原始数据
  • Var1是需要比较的变量,Var2是分组变量(factors)

Chi-square test

  • chisq.test 只接受列好的四格式表
LowTIR=c(6,4,5,5)
HighTIR=c(26,17,53,29)
data_drug=data.frame(LowTIR,HighTIR,row.names = c("胰岛素","磺脲类","二甲双胍","阿卡波糖"))

在这里插入图片描述

Kruskal-Wallis Rank Sum Test

kruskal.test(nonnormVar~group,data = df)

正态性检验

qq图

qqnorm(x)
qqline(x)

Kolmogorov-Smirnov检验

#方法一
ks.test(x,"pnorm")

#方法二
library(nortest)
lillie.test(x)

Shapiro-Wilk检验

shapiro.test(x)
#R语言中的shapiro test 限制样本量<5000

控制混杂

library(MatchIt)

成组匹配

个体匹配

PSM

  • 0
    点赞
  • 6
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值