清空输出文件,没有任何错误或警告

我试图简单地加入两个文件,但是由于出文件为空,我被卡住了。任何帮助将不胜感激。谢谢!

这是我连接两个文件的代码:

WD <- read.csv("~my path")
setwd <- (WD)

library(stringr)
library(dplyr)
library(readr)

mydata1 <- read.csv("~mypath\\20200514_002.csv", header = TRUE)
df1<-data.frame(mydata1)
mydata2<-read.csv("~mypath\\iRT_A2_MassList_Model.csv", header=TRUE)
df2<-data.frame(mydata2)

替换列中的字符串

df1$Comment <- gsub('[(heavy)]', '', df1$Comment)
View(df1)
Joint_df <- merge(df1, df2, by= c("Comment"="Compound")) 

我还使用了by.x“注释”,by.y“复合” ...但两者都不起作用

View(Joint_df)

这里的输出为空

write.csv(Joint_df,"~mypath\\Joint.csv", row.names = FALSE)
评论