当前位置:网站首页>[R language] interaction test data
[R language] interaction test data
2022-08-09 06:01:00 【The bionic bug】
#载入数据
data<-read.csv("Labor analgesia and7Weekly postpartum prognostic score.csv")
str(data)
data$Score <- as.numeric(data$Score)
data$LaborAnalgesia <- as.factor(data$LaborAnalgesia)
data$Delivery <- as.factor(data$Delivery)
data$ID <- as.factor(data$ID)
#Simple chi-square test
data$Score_group <- ifelse(data$Score<=13,0,1)
table(data$Score_group,data$LaborAnalgesia)
s=chisq.test(data$Score_group,data$LaborAnalgesia,correct = TRUE)
s
s$expected
#Hierarchical Chi-square analysis 【按Delivery分层】
table(data$Score_group,data$LaborAnalgesia,data$Delivery)
mantelhaen.test(data$Score_group,data$LaborAnalgesia,data$Delivery)
#【广义线性模型】 【as a dependent variable】
fit <- glm(Score_group ~ LaborAnalgesia+Delivery,family = binomial(link = "logit"), data)
summary(fit)
#Consider interactions
fit2 <- glm(Score_group ~ LaborAnalgesia*Delivery,family = binomial(link = "logit"), data)
summary(fit2)
# 广义线性模型fit的R-Square
library(rsq)
rsq(fit, #模型
adj=FALSE #Whether to correctR2
,type=c("lr"))
rsq(fit2,adj=FALSE,type=c("lr"))
#【线性混合模型】【分娩方式Deliveryas a random effect】
library(lme4)
lmer1 <- lmer(Score_group ~ LaborAnalgesia+(1|Delivery),data )
summary(lmer1)
rsq(lmer1,adj=FALSE,type=c("lr"))
边栏推荐
猜你喜欢
王爽 汇编语言个人疑问汇总第九篇
在命令行打开LaTeX宏包手册
shell正则表达式
SiO2 / KH550 modified ferroferric oxide nano magnetic particles | PDA package the ferromagnetic oxide nanoparticles (research)
软件测试工程师简历要怎么写,才能让HR看到
八、开发者工具与单元测试
Spark源码-任务提交流程-8-DAGScheduler任务切分
绕过反调试fuck-debugger
二硫化钼/二氧化铪的复合纳米材料(MoS2/HfO2)|钽掺杂二氧化铪纳米颗粒(齐岳bio)
Three Musketeers Advanced
随机推荐
绕过反调试fuck-debugger
文本字符串长度排序 - 在线工具
正则表达式-判断字符串是否匹配“AABB”模式
直播源码开发,点击扫描跳转到扫码页面
Unity 五子棋游戏设计和简单AI(2)
qt发送邮件程序
Fe3O4/SiO2 Composite Magnetic Nanoparticles Aminated on SiO2-NH2/Fe3O4 Surface (Qiyue Reagent)
【R语言】交互作用 测试数据
VScode安装了ESlint以后不管用、不生效的解决办法
一天学习一家上市公司:索菲亚
Magnetic Core-Shell Fe3O4 Particles Supported Gold Nanostars | Magnetic Fe3O4-POSS-COOH | Superparamagnetic Fe3O4-Polydopamine Core-Shell Nanoparticles
多行字符串排序在线工具
SiO2/KH550修饰四氧化三铁纳米磁性颗粒|PDA包裹四氧化三铁磁性纳米颗粒(科研级)
Getting Started with MATLAB Image Processing
深度学习-神经网络原理2
【JMeter】jmeter测试 - 上传多个图片/批量上传图片接口 CSV文件参数化方法
Build a "firewall" for safety and carry out firefighting training in Fengzhuang Township, Tongxu County, Henan Province
pytorch implements GAN entry case
MATLAB图像处理入门
shell function