在 R markdown 中包装长 url 行

Question

我已经阅读了关于此的各种帖子，但我仍然没有找到解决方案。下面是一些示例代码：

library(dplyr)
library(lubridate)

urlfile<-'https://raw.githubusercontent.com/blakeobeans/Predicting-Service-Calls/master/Data/nc.csv'
dates<-read.csv(urlfile, header=FALSE)
dates$V1 <- mdy(dates$V1)
dates <- dates %>%
    rename("data.time" = V1) %>%
    filter("2017-10-01" >= data.time & data.time >= "2017-06-01") %>%
    group_by(data.time) %>%
    summarise(n = n())

当我输出到pdf...

如果我在代码中的注释超出了灰色条，也会发生同样的事情。

我在开始时尝试使用以下代码行：

knitr::opts_chunk$set(tidy.opts=list(width.cutoff=60),tidy=TRUE)

但这无济于事。

Answer 1

我在将包放在 CRAN 上时遇到了类似的问题（如果Rd文件行超过 90 个字符，他们会给出注释（注意：行宽超过 90 个字符））。我的函数的参数之一是github数据集的url 。解决方案是将 url 拆分为单独的参数。例如：

urlRemote  <- "https://raw.githubusercontent.com/"
pathGithub <- "blakeobeans/Predicting-Service-Calls/master/Data/"
fileName   <- "nc.csv"

你可以像这样在你的代码中使用它：

paste0(urlRemote, pathGithub, fileName) %>%
    read.csv(header = FALSE)

该解决方案具有如下优点：当你想在同一版本库使用多个文件，你可以使用paste0(urlRemote, pathGithub, fileName1)，paste0(urlRemote, pathGithub, fileName2)等等。