使用R嵌套IfElse语句比较两个变量字符串

使用R嵌套IfElse语句比较两个变量字符串,r,string,csv,if-statement,printing,R,String,Csv,If Statement,Printing,示例输入数据(存储在工作目录中的csv中): 代码: 实际: > print(Transfers2) Error in print(Transfers2) : object 'Transfers2' not found 不知为什么会发生这种情况 所以我发现了我的问题 为了让代码正常工作,我必须将光标放在每个代码块的行尾,并按顺序分别运行它们 我跳到了脚本的底部,将光标放在最后一行代码下面,运行它并得到错误 为什么我必须一次运行一个代码块,并将光标放在代码块中?无法复制。我将您的示例输入数

示例输入数据(存储在工作目录中的csv中):

代码:

实际:

> print(Transfers2)
Error in print(Transfers2) : object 'Transfers2' not found
不知为什么会发生这种情况

所以我发现了我的问题

为了让代码正常工作,我必须将光标放在每个代码块的行尾,并按顺序分别运行它们

我跳到了脚本的底部,将光标放在最后一行代码下面,运行它并得到错误


为什么我必须一次运行一个代码块,并将光标放在代码块中?

无法复制。我将您的示例输入数据复制到一个
Transfers.csv
文件中,执行您的代码行,一切正常。如果您收到“Transfers2未找到”的消息,则表示前面的代码行有错误。据我所知,您读取csv文件的代码与您发布的示例数据不匹配。@MrFlick我的代码中有什么让您认为与数据不匹配的内容?答案不是可能的重复内容。
Transfers <- read.csv(file="Transfers.csv", head=TRUE, sep=",",colClasses=c(NA,NA,NA,NA,NA,NA,NA,"Date",NA))

Transfers$ChangeType <- ifelse(Transfers$From_DeptCode == Transfers$To_DeptCode, "No Change", ifelse(Transfers$TransactionType == "Reorg", "Reorg", "Transfer")) 

Transfers2 <- subset(Transfers, ChangeType != "No Change")

print(Transfers2)
EMPLID,From_DeptCode,FromDept,To_DeptCode,To_Dept,TransactionTypeCode,TransactionType,EffectiveDate,ChangeType
0239583290,21,Sales,43,CustomerService,10,Promotion,12/12/2012,Transfer
3040593021,19,Headquarters,23,International,11,Reorg,12/13/2011,Reorg
7029406920,15,Marketing,84,Development,19,Reassignment,1/5/2010,Transfer
> print(Transfers2)
Error in print(Transfers2) : object 'Transfers2' not found