ID<-c("A1", "A2", "A3", "A4", "A5")  
x<-c(0,1,2,1,1)
y<-c(2,1,1,1,1)
z<-c(0,1,1,0,0)
mydata<-data.frame(ID,x,y,z)

如何将除ID列以外的所有列转换为BINARY,如上所述,0应编码为1.

我的原始数据大约有1000列.

推荐答案

你可以试试

mydata[-1]  <- + (mydata[-1] > 0)

mydata[-1] <- 1 - !mydata[-1]

以至于

> mydata
  ID x y z
1 A1 0 1 0
2 A2 1 1 1
3 A3 1 1 1
4 A4 1 1 0
5 A5 1 1 0

R相关问答推荐

查找图下的面积

在垂直轴中包含多个ggplot2图中的平均值

用值序列对行进行子集化,并标识序列开始的列

使用across,starts_with和ifelse语句变更多个变量

如何将SAS数据集的列名和列标签同时包含在r中GT表的表首?

基于R中的间隔扩展数据集行

过滤名称以特定字符串开头的文件

为什么在BASE R中绘制线条时会看到线上的点?

在数据帧列表上绘制GGPUP

按组计算列中1出现的间隔年数

R+reprex:在呈现R标记文件时创建可重现的示例

通过初始的shiny 应用更新部署的shiny 应用的数据和参数,其中部署的应用程序显示为URL

将统计检验添加到GGPUBR中的盒图,在R

为什么函数toTitleCase不能处理english(1),而toupper可以?

使用ggplot2绘制具有边缘分布的坡度图

roxygen2正在处理太多的文件

如何将字符类对象中的数据转换为R中的字符串

如何计算多个变量的百分比与总和的百分比?

汇总数据:在跨越()all_of()Dynamic_list_of_vars=>;所选内容不能有缺失值的汇总()中出错

Gggvenn为Venn增加了不存在的价值