执行R代码嵌套IF条件时出错

Question

我正在尝试执行下面的R代码，这是抛出错误

if(as.Date(df$Start.Date[1])== as.Date(df$Completed.Date[1])) {
SHour = as.numeric(as.difftime(format(df$Start.Date[1],"%H:%M:%S"),units = "hours"))
CHour = as.numeric(as.difftime(format(df$Completed.Date[1],"%H:%M:%S"),units = "hours"))
if(SHour>=sh && CHour<=eh) { 
df$nHours[1] = as.numeric(difftime(df$Completed.Date[1],df$Start.Date[1],units = "hours"))
} elseif(SHour<=sh && CHour<=eh) { 
df$nHours[1] = as.numeric(sh-CHour) 
} elseif(SHour>=sh && CHour>=eh) { 
df$nHours[1] = as.numeric(eh-SHour) 
} else { 
df$nHours[1] = eh-sh
}

}

接收错误:

错误:意外符号:";df$nHours[1] = as.numeric(difftime) (df$Completed.Date[1]，df$Start。日期[1]，单位="小时"} elseif"

df$nHours[1] = as.numeric(sh-CHour) 

错误:对象'CHour'未找到

} elseif(SHour>=sh && CHour>=eh) { 

错误:"}">

df$nHours[1] = as.numeric(eh-SHour) 

错误:对象' hour '未找到

有人能帮助我做错了什么在这里嵌套的如果条件?

Thanks in Advance.

Answer 1

else和if之间应该有空格，这是我在代码中遗漏的。给空间后，我的代码工作得很好。谢谢你。