将R中的二进制变量合并到一个新变量

发布于07月11日

我有三个分类变量，即中风、心肌梗死和血压，其值分别为0=是和1=否.我想将它们合并，在这三个变量中生成一个新变量"cvd"，其中每一行的0值在新的心血管变量中为0.例如:

Stroke  MI  BP  CVD
0       1    1   0
1       1    1   1
1       1    0   0

我try 了以下代码，但这不是我想要的

transform(koratest, cvd=paste(stroke,MI, BP))

有人能帮个忙吗？ playbook 是什么？

最好的

推荐答案

另一种方式:

library(dplyr)

df <- data.frame(Stroke = c(0,1,1),
                   MI = c(1,1,1),
                   BP = c(1,1,0))

df %>% 
  rowwise() %>% 
  mutate(
    CVD = min(Stroke, MI, BP) 
  ) %>% 
  ungroup()

#> # A tibble: 3 × 4
#>   Stroke    MI    BP   CVD
#>    <dbl> <dbl> <dbl> <dbl>
#> 1      0     1     1     0
#> 2      1     1     1     1
#> 3      1     1     0     0

^{由reprex package(v2.0.1)于2022-07-11创建}