Разделить код на несколько строк в скрипте R

Я хочу разбить строку в сценарии R на несколько строк (потому что это слишком долго). Как я могу это сделать?

В частности, у меня есть такая строка

setwd('~/a/very/long/path/here/that/goes/beyond/80/characters/and/then/some/more')

Можно ли разбить длинный путь на несколько строк? Я попытался

setwd('~/a/very/long/path/here/that/goes/beyond/80/characters/and/
then/some/more')

с returnключом в конце первой строки; но это не работает.

Спасибо.

Вы разбиваете код не на несколько строк, а на один идентификатор . Есть разница.

Для вашей проблемы попробуйте

R> setwd(paste("~/a/very/long/path/here",
               "/and/then/some/more",
               "/and/then/some/more",
               "/and/then/some/more", sep=""))

что также показывает, что код разбит на несколько строк.

Бах, комментарии слишком малы. Во всяком случае, @Dirk очень прав.

R не нужно сообщать, что код начинается со следующей строки. Он умнее, чем Python ;-) и просто продолжит читать следующую строку всякий раз, когда он считает это выражение «не завершенным». На самом деле, в вашем случае он также перешел на следующую строку, но R принимает возврат как символ, когда он находится между "".

Имейте в виду, вы должны убедиться, что ваш код не закончен. сравнить

a <- 1 + 2
+ 3

с участием

a <- 1 + 2 +
3

Таким образом, при распределении кода по нескольким строкам вы должны убедиться, что R знает, что что-то идет, либо:

• оставив скобку открытой, или
• окончание строки оператором

Когда мы говорим о строках, это все еще работает, но вы должны быть немного осторожнее. Вы можете открыть кавычки, и R будет читать, пока вы не закроете его. Но каждый символ, включая символ новой строки, будет рассматриваться как часть строки:

x <- "This is a very
long string over two lines."
x
## [1] "This is a very\nlong string over two lines."
cat(x)
## This is a very
## long string over two lines.

Вот почему в этом случае ваш код не работал: путь не может содержать символ новой строки ( \n). Так что также объясняет , почему лучше использовать решение с paste()или paste0()предложенным Dirk.

Приведенный выше метод Дирка будет абсолютно работать, но если вы ищете способ ввести длинную строку, в которой важно сохранить пробел / структуру (например, SQL-запрос с использованием RODBC), есть двухэтапное решение.

1) Перенесите текстовую строку в несколько строк

long_string <- "this
is 
a 
long
string
with
whitespace"

2) R представит кучу \nсимволов. Удалите те strwrap(), которые уничтожают пробелы, согласно документации :

strwrap(long_string, width=10000, simplify=TRUE)

Сказав strwrap обернуть ваш текст в очень, очень длинную строку, вы получите односимвольный вектор без пробелов и символов новой строки.

Для этого конкретного случая есть file.path:

File <- file.path("~", 
  "a", 
  "very", 
  "long",
  "path",
  "here",
  "that",
  "goes",
  "beyond",
  "80",
  "characters",
  "and",
  "then",
  "some",
  "more")
setwd(File)

Я знаю, что этот пост старый, но у меня была такая ситуация, и я просто хочу поделиться своим решением. Все ответы выше работают нормально. Но если у вас есть такой код, как в Синтаксисе цепочек data.table, это становится сложным делом. Например, у меня была такая проблема.

mass <- files[, Veg:=tstrsplit(files$file, "/")[1:4][[1]]][, Rain:=tstrsplit(files$file, "/")[1:4][[2]]][, Roughness:=tstrsplit(files$file, "/")[1:4][[3]]][, Geom:=tstrsplit(files$file, "/")[1:4][[4]]][time_ [с]<=12000]

Я попробовал большинство предложений выше, и они не сработали. но я понял, что их можно разделить запятой внутри []. Расщепление ][не работает.

mass <- files[, Veg:=tstrsplit(files$file, "/")[1:4][[1]]][, 
    Rain:=tstrsplit(files$file, "/")[1:4][[2]]][, 
    Roughness:=tstrsplit(files$file, "/")[1:4][[3]]][, 
    Geom:=tstrsplit(files$file, "/")[1:4][[4]]][`time_[s]`<=12000]