Kodu bir R komut dosyasında birden çok satıra bölme

Birden çok satır üzerinde bir R komut dosyasında bir satırı bölmek istiyorum (çok uzun olduğu için). Bunu nasıl yaparım?

Özellikle, benim gibi bir çizgi var

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

Uzun yolu birden çok satıra bölmek mümkün mü? denedim

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

ile returnilk satırının sonunda anahtar; ama bu işe yaramıyor.

Teşekkürler.

Sen kırma değildir kod çoklu hatları üzerinden değil, tek bir tanımlayıcı . Bir fark var.

Sorununuz için deneyin

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

bu da kodu birden çok satıra bölmenin mükemmel olduğunu gösterir.

Bah, yorumlar çok küçük. Her neyse, @Dirk çok haklı.

R'nin kodun bir sonraki satırdan başladığı söylenmesine gerek yoktur. Python ;-)'den daha akıllıdır ve ifadeyi "tamamlanmadı" olarak değerlendirdiğinde bir sonraki satırı okumaya devam edecektir. Aslında, sizin durumunuzda da bir sonraki satıra gider, ancak R "" arasına yerleştirildiğinde bir karakter olarak geri döner.

Dikkat edin, kodunuzun bitmediğinden emin olmanız gerekir. Karşılaştırmak

a <- 1 + 2
+ 3

ile

a <- 1 + 2 +
3

Bu nedenle, kodu birden çok satıra dağıtırken, R'nin bir şeyin geldiğini bildiğinden emin olmalısınız:

• bir braketi açık bırakarak veya
• bir operatörle hattın sonlandırılması

Dizelerden bahsederken, bu hala işe yarıyor ama biraz dikkatli olmanız gerekiyor. Tırnak işaretlerini açabilirsiniz ve siz kapatana kadar R okuyacaktır. Ancak yeni satır dahil her karakter dizenin bir parçası olarak görülecektir:

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.

Bu durumda, kodunuzun çalışmadığının nedeni budur: bir yol yeni satır karakteri ( \n) içeremez . Bu yüzden çözümü paste()veya paste0()Dirk'in önerisini daha iyi kullanmanızın nedeni de budur .

Yukarıdaki Dirk yöntemi kesinlikle işe yarayacaktır, ancak boşluk / yapının korunması önemli olan uzun bir dize getirmenin bir yolunu arıyorsanız (örnek: RODBC kullanan bir SQL sorgusu) iki adımlı bir çözüm vardır.

1) Metin dizesini birden çok satıra getirin

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

2) R bir grup \nkarakteri tanıtacaktır . Boşlukları strwrap()tahrip eden belgeleri belgelere göre ayırın :

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

Strwrap'e metninizi çok, çok uzun bir satıra sarmasını söyleyerek, boşluk / satırsonu karakteri olmayan tek bir karakter vektörü elde edersiniz.

Bu özel durum için file.path:

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

Bu yazının eski olduğunu biliyorum, ancak böyle bir Durumum vardı ve sadece çözümümü paylaşmak istiyorum. Yukarıdaki tüm cevaplar iyi çalışıyor. Ancak data.table zincirleme sözdizimindeki gibi bir Kodunuz varsa, bu zorlaşır. örneğin böyle bir Sorun yaşadım.

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]]][zamanlar]<=12000]

Yukarıdaki önerilerin çoğunu denedim ve işe yaramadı. ama içlerindeki virgülden sonra bölünebileceklerini anladım []. Bölme işlemi ][işe yaramıyor.

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]