R 管道行和的简单方法

R 管道行和的简单方法,r,dataframe,dplyr,tidyverse,rowsum,R,Dataframe,Dplyr,Tidyverse,Rowsum,我有以下数据框(显示头部样本) 我以前做过很多操作(比如删除列),但我没有找到一个函数将简单的行和导入到新列中。这是我一直在做的事情 sample%mutate(总计=行和(1:20)) 我一直在网上寻找 sum(c_跨 但R无法识别它,尽管加载了tidyverse和dplyr一个dplyr选项将c_横跨(),但它需要一个行id: library(dplyr) #Code sample %>% mutate(id=1:n())%>% rowwise(id) %>% mu

我有以下数据框(显示头部样本)

我以前做过很多操作(比如删除列),但我没有找到一个函数将简单的行和导入到新列中。这是我一直在做的事情
sample%mutate(总计=行和(1:20))

我一直在网上寻找
sum(c_跨


但R无法识别它,尽管加载了tidyverse和dplyr

一个
dplyr
选项将
c_横跨()
,但它需要一个行id:

library(dplyr)
#Code
sample %>% mutate(id=1:n())%>%
  rowwise(id) %>%
  mutate(total=sum(c_across(VR1:VR20),na.rm=T))
输出:

# A tibble: 6 x 22
# Rowwise:  id
    VR1 VR2     VR3   VR4   VR5   VR6   VR7   VR8   VR9  VR10  VR11  VR12  VR13  VR14  VR15  VR16
  <int> <lgl> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int>
1    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
2    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
3     1 NA        0     1     1     0     1     0     1     1     0     0     1     1     1     0
4    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
5     0 NA        0     0     1     0     0     0     1     0     0     0     0     0     1     0
6    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
# ... with 6 more variables: VR17 <int>, VR18 <int>, VR19 <int>, VR20 <int>, id <int>, total <int>
#一个tible:6 x 22
#罗维:是的
VR1 VR2 VR3 VR4 VR5 VR6 VR7 VR8 VR9 VR10 VR11 VR12 VR13 VR14 VR15 VR16
1娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜
2娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜
31 NA 01 01 01 01 01 01 01 01 01 0
4娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜娜
5 0 NA 0 1 0 0 1 0 0 0 0 0 1 0
6NaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNaNa
#…还有6个变量:VR17、VR18、VR19、VR20、id、总计

使用的数据是您共享的
dput(示例)

一种方法是
…total=rowsumes(,na.rm=TRUE)
我想我对我的问题不是很清楚,不是很清楚。我现在以以下方式解决了它,供任何人参考
示例%replace(is.na(.),0)%>%mutate(vrat_total=rowsumes([1:20]))
我仍然不明白“c_Cross”命令是如何工作的,它属于什么包。
# A tibble: 6 x 22
# Rowwise:  id
    VR1 VR2     VR3   VR4   VR5   VR6   VR7   VR8   VR9  VR10  VR11  VR12  VR13  VR14  VR15  VR16
  <int> <lgl> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int>
1    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
2    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
3     1 NA        0     1     1     0     1     0     1     1     0     0     1     1     1     0
4    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
5     0 NA        0     0     1     0     0     0     1     0     0     0     0     0     1     0
6    NA NA       NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA    NA
# ... with 6 more variables: VR17 <int>, VR18 <int>, VR19 <int>, VR20 <int>, id <int>, total <int>