编织为HTML时出现代码R Markdown错误

Question

我试图在我的降价文档中运行代码块。 我有一个R脚本，可以运行我需要的所有代码而没有任何问题。 然后，当我将代码复制并粘贴到markdown文档中时，该代码将在块内运行，但是在尝试编织为输出文档（html / pdf）时将失败。

我必须创建一个safe.ifelse函数来防止r将日期转换为此处讨论的数字格式。

该错误似乎与以下代码有关：

safe.ifelse = function(cond, yes, no){structure(ifelse(cond, yes, no), class = class(yes))
}

我收到的错误消息是：

第121行结构错误（ifelse（cond，yes，no），class = class（yes））：找不到函数“ days”调用：... transform.data.frame-> eval-> eval->安全。 ifelse->结构执行停止

我的safe.ifelse函数后面的代码行是

seminoma1 = transform(seminoma1, recur.date = safe.ifelse(salvage.tx=="Yes",
date.diagnosis + days(pmax(time.rad, time.chemo, na.rm=TRUE)), NA))

任何帮助，将不胜感激。 谢谢。

Answer 1

我仍然太新以至于无法发表评论，但是唯一一次出现这样的错误的时候是我忘记定义函数/变量或忘记提供程序包的源代码。

由于days()不是R的基本软件包的一部分，因此我认为您需要添加：

```{r echo = FALSE}
library("lubridate")
```