我想创建一个供内部使用的包（不要在某处分发）。我的一个函数包含行
if (data$unit[i] != "°C") {
它在脚本中完美运行，但如果我想使用devtools的document（）为我的包创建文档，我会收到错误
解析时出错（text = lines，keep.source = TRUE，srcfile = srcfilecopy（file， path_to_my_code ：意外的INCOMPLETE_STRING
279：if（！is.na（data $ unit [i]）{
280：if（data $ unit [i]！=“
另外：警告信息： 在readLines中（con，warn = FALSE，n = n，ok = ok，skipNul = skipNul）： 在输入连接' path_to_my_code '
上找到无效输入
如果删除°字符，则document（）有效。但我需要这个角色，所以这不是一个选择。
在if子句中使用double-时，我的函数不再检测°C，如下所示：
test <- c("mg/l", "°C")
"\\°C" %in% test
[1] FALSE
如果我使用tryCatch，则也不会创建文档。
"°C"替换gsub(pattern = '\\\\', replacement = "", x = '\\°C')会导致函数在双\ _处崩溃。
如何告诉document（）一切正常，它应该只创建文件？