【发布时间】：2022-01-15 08:10:49
【问题描述】：
我有一个简单的逻辑回归，比如
logit(p[i]) <- b0 + b1*x[i]
但 p[i] 的数据以“是”、“否”的形式给出。如何将 ("yes"/"no") 编码为 (1,0) ？
例如像这样的smt
logit(encode(p[i])) <- b0 + b1*x[i]
【问题讨论】：
-
嗨@NovaTechGuy，
ifelse声明将解决您的问题
【发布时间】：2022-01-15 08:10:49
【问题描述】：
尝试老式的方式！我假设 p 和 x 是我在名为 df 的数据框中组合的数据列。
library(tidyverse)
library(stats) # for glm
df <- as.dataframe(cbind(p,x))
df %>% mutate(p=ifelse(p=="yes",1,0)
logit.model <- glm(p~x, data=df, family=binomial(link="logit"))
summary(logit.model)
【讨论】：
-
我需要建立一个 openBugs 模型，在 R 中会很容易。谢谢