Win汤er 2022-12-16 23:40 采纳率: 66.7%
浏览 48
已结题

在r语言用for和ifelse判断1个数据框的列名是否出现在另一个数据框的对应列中,若出现把原第1个数据框对应位置赋为1否则赋0

判断1个数据框的列名是否出现在另一个数据框的对应列中,若出现把原第1个数据框对应位置赋为1否则赋0
通过for循环和ifelse运行无效果
genomeID=read.csv("genomeID.csv",row.names = 1)
gene_to_ko=read.csv("gene_to_ko.csv")
genomeIDbackup=genomeID
gene_to_kobackup=gene_to_ko

genomeX=list()
geneY=list()
for(genomeX in list(rownames(genomeID))){
  for (geneY in list(colnames(genomeID))){
    ifelse(geneY %in% gene_to_ko$genomeX,
           genomeID[genomeX,geneY]<-1,
           genomeID[genomeX,geneY]<-0)
  }
}


```用代码块功能插入代码,请勿粘贴截图。 不用代码块回答率下降 50%

###### 运行结果及详细报错内容

###### 通过for循环和ifelse运行无效果

###### 对genomeID表格中的每列均进行查找比对,预期得到的表格如下

![img](https://img-mid.csdnimg.cn/release/static/image/mid/ask/907491502176129.png "#left")
  • 写回答

1条回答 默认 最新

  • ChatGPTᴼᴾᴱᴺᴬᴵ 2022-12-17 06:04
    关注

    以下回答由ChatGPT提供
    首先,您在 for 循环中没有指定列名或行名,因此 genomeX 和 geneY 可能不是您想要的行和列的名称。您应该指定枚举的行和列的名称,例如:

    for (genomeX in rownames(genomeID)) {
      for (geneY in colnames(genomeID)) {
        ...
      }
    }
    

    其次,在 ifelse 语句中,你使用了变量 geneY 作为一个字符串,而不是一个变量。因此,您应该把它改为:

    ifelse(geneY %in% gene_to_ko[[genomeX]],
           genomeID[genomeX,geneY]<-1,
           genomeID[genomeX,geneY]<-0)
    

    注意,这里使用了 [[]] 操作符来访问 gene_to_ko 中的某一列,而不是 $ 操作符。

    最后,这段代码会在 genomeID 中修改列的值,但是并没有对 gene_to_ko 进行任何操作。如果您想修改 gene_to_ko 中的列的值,您可以在 ifelse 语句中使用 gene_to_ko 中的列,例如:

    ifelse(geneY %in% gene_to_ko[[genomeX]],
           gene_to_ko[genomeX,geneY]<-1,
           gene_to_ko[genomeX,geneY]<-0)
    

    希望这些修改能帮助您解决问题

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论 编辑记录

报告相同问题?

问题事件

  • 系统已结题 12月25日
  • 已采纳回答 12月17日
  • 创建了问题 12月16日

悬赏问题

  • ¥15 有关AT89C51单片机问题
  • ¥15 请使用蚁群算法解决下列问题,并给出我完整的代码
  • ¥20 关于php录入完成后,批量更新数据库
  • ¥15 请教往复密封润滑问题
  • ¥15 cocos creator发布ios包
  • ¥15 comsol压电材料数据
  • ¥35 用python实现除法算法中goldschmidt算法
  • ¥15 汇编代码转换成C代码
  • ¥15 除法算法中的归一化具体是怎么变的?
  • ¥20 集成电路的逻辑电路和晶体管简化图