Çalışma dizinini Rstudio'da kaynak dosya konumuna ayarlamak için R komutu

R'de bazı öğreticiler üzerinde çalışıyorum. Her R kodu belirli bir klasörde bulunur. İçinde veri dosyaları ve başka dosyalar var. Açmak istiyorum.rDosyayı aşağıda gösterildiği gibi Rstudio'daki çalışma dizinini değiştirmem gerekmeyecek şekilde kaynak yapmak istiyorum:

Çalışma dizinimi otomatik olarak R'de belirtmenin bir yolu var mı?

Kaynak alınan bir komut dosyasının konumunu öğrenmek için utils::getSrcDirectoryveya kullanabilirsiniz utils::getSrcFilename. Böylece, çalışma dizinini mevcut dosyanınkiyle değiştirmek şu şekilde yapılabilir:

setwd(getSrcDirectory()[1])

Kodu Kaynaklamak yerine Çalıştırırsanız , RStudio'da bu çalışmaz . Bunun için kullanmanız gerekiyor .rstudioapi::getActiveDocumentContext

setwd(dirname(rstudioapi::getActiveDocumentContext()$path))

Bu ikinci çözüm, elbette IDE'niz olarak RStudio'yu kullanmanızı gerektirir.

Bu sorunun modası geçmiş olduğunu biliyorum, ancak bunun için de bir çözüm arıyordum ve Google bunu en üstte listeliyor:

this.dir <- dirname(parent.frame(2)$ofile)
setwd(this.dir)

bunu dosyanın bir yerine koyun (en iyisi başlangıçtır), böylece wd o dosyaya göre değişir.

Yorumlara göre, bu her platformda mutlaka çalışmayabilir (Windows çalışıyor gibi görünüyor, bazıları için Linux / Mac). Bu çözümün dosyalara 'kaynak sağlamak' için olduğunu, bu dosyadaki yığınları çalıştırmak için gerekli olmadığını unutmayın.

ayrıca `kaynak`d dosyasının dosya adını ve yolunu alma konusuna bakın

dirname(rstudioapi::getActiveDocumentContext()$path)

benim için çalışıyor ancak rstudioapi'yi kullanmak istemiyorsanız ve bir projede değilseniz, yolunuzda ~ sembolünü kullanabilirsiniz. ~ Sembolü, varsayılan RStudio çalışma dizinini ifade eder (en azından Windows'ta).

RStudio çalışma dizininiz "D: / Documents" ise, setwd("~/proyect1") ise, setwd ("D: / Documents / proyect1") ile aynıdır.

Bunu belirledikten sonra, bir alt dizinin gidebilirsiniz: read.csv("DATA/mydata.csv"). İle aynıdır read.csv("D:/Documents/proyect1/DATA/mydata.csv").

Bir ana klasöre gitmek istiyorsanız, kullanabilirsiniz "../". Örneğin: read.csv("../olddata/DATA/mydata.csv")hangisi aynıread.csv("D:/Documents/oldata/DATA/mydata.csv")

Hangi bilgisayarı kullanıyor olursanız olun, komut dosyalarını kodlamanın en iyi yolu budur.

Bu cevap yardımcı olabilir:

script.dir <- dirname(sys.frame(1)$ofile)

Not: doğru yolu döndürmek için komut dosyası kaynaklı olmalıdır

Buldum : https://support.rstudio.com/hc/communities/public/questions/200895567-can-user-obtain-the-path-of-current-Project-s-directory-

BumbleBee'nin cevabı (sys.frame yerine parent.frame ile) benim için işe yaramadı, her zaman bir hata alıyorum.

İçin rstudio , otomatik kullanarak komut dizinine çalışma dizinini ayarlayabilirsiniz rstudioapi böyle:

library(rstudioapi)

# Getting the path of your current open file
current_path = rstudioapi::getActiveDocumentContext()$path 
setwd(dirname(current_path ))
print( getwd() )

Bu, dosyanızı Çalıştırırken veya Kaynak Oluştururken çalışır.

Önce rstudioapi paketini kurmanız gerekir. Doğru yerde olduğumdan% 100 emin olmak için yolu yazdırdığıma dikkat edin, ancak bu isteğe bağlıdır.

Çözüm

dirname(parent.frame(2)$ofile)

benim için çalışmıyor.

Bir kaba kuvvet algoritması kullanıyorum ama işe yarıyor:

File <- "filename"
Files <- list.files(path=file.path("~"),recursive=T,include.dirs=T)
Path.file <- names(unlist(sapply(Files,grep,pattern=File))[1])
Dir.wd <- dirname(Path.file)

Bir dizini ararken daha kolay:

Dirname <- "subdir_name"
Dirs <- list.dirs(path=file.path("~"),recursive=T)
dir_wd <- names(unlist(sapply(Dirs,grep,pattern=Dirname))[1])

Linux üzerinde çalışıyorsanız, şunu deneyebilirsiniz:

setwd(system("pwd", intern = T) )

Benim için çalışıyor.

Bu soruna bir çözüm arıyordum, bu sayfaya geldim. Eski olduğunu biliyorum, ancak tatmin edici olmayan veya benim için işe yaramayan önceki çözümler. İlgileniyorsanız işte benim çalışmam.

filename = "your_file.R"
filepath = file.choose()  # browse and select your_file.R in the window
dir = substr(filepath, 1, nchar(filepath)-nchar(filename))
setwd(dir)

Bunun eski bir iş parçacığı olduğunun farkındayım, ancak çalışma dizinini ayarlama gereksinimi ile benzer bir sorun yaşadım ve benim için işe yarayacak çözümlerden hiçbirini alamadım. Daha sonra başka birinin buna rastlaması durumunda işe yarayan şudur:

# SET WORKING DIRECTORY TO CURRENT DIRECTORY:
system("pwd=`pwd`; $pwd 2> dummyfile.txt")
dir <- fread("dummyfile.txt")
n<- colnames(dir)[2]
n2 <- substr(n, 1, nchar(n)-1)
setwd(n2)

Biraz kıvrımlıdır, ancak temelde bu, çalışma dizinini almak ve dummyfile.txt'ye kaydetmek için sistem komutlarını kullanır, ardından R, bu dosyayı data.table :: fread kullanarak okur. Gerisi sadece dosyaya yazdırılanları temizlemek, böylece sadece dizin yolunu bırakmam.

R'yi bir kümede çalıştırmam gerekiyordu, bu yüzden hangi dizine gireceğimi bilmenin bir yolu yoktu (işlere bir numara ve bir hesaplama düğümü atanır). Bu benim için hile yaptı.

Bunun modası geçmiş olduğunu anlıyorum, ancak eski cevapları çok tatmin edici bir şekilde işe alamadım, bu yüzden BumbleBee'nin cevabına yapılan yorumlarda belirtilen aynı hatayla başka birinin karşılaşması durumunda yöntemime katkıda bulunmak istedim.

Benimki basit bir sistem komutuna dayanıyor. İşlevi beslediğiniz tek şey, komut dosyanızın adıdır:

extractRootDir <- function(x) {
    abs <- suppressWarnings(system(paste("find ./ -name",x), wait=T, intern=T, ignore.stderr=T))[1];
    path <- paste("~",substr(abs, 3, length(strsplit(abs,"")[[1]])),sep="");
    ret <- gsub(x, "", path);
    return(ret);
}

setwd(extractRootDir("myScript.R"));

İşlevin çıktısı şöyle görünecektir "/Users/you/Path/To/Script". Umarım bu, takılıp kalmış olabilecek herkese yardımcı olur.

herepaket sağlarhere() bazı tahminlere dayalı proje kök dizinini döndüren işlevi.

Senaryonun yerini bulamadığı için mükemmel bir çözüm değil, ama bazı amaçlar için yeterli, bu yüzden buraya koyayım dedim.

Çoğu GUI, bir dizindeyseniz ve bir .R dosyasını "açarsanız", çift tıklatırsanız veya başka bir şekilde çalıştırmaya çalışırsanız, aksi belirtilmedikçe, içinde bulunduğu dizinin çalışma dizini olacağını varsayar. Mac GUI, çalışan bir oturumda ayarladığınız Tercihler Başlangıç ​​panelinde değiştirilebilen ve bir sonraki "başlangıçta" etkili olan bu varsayılan davranışı değiştirmek için bir yöntem sağlar. Ayrıca şunlara da bakmalısınız:

?Startup

RStudio belgeleri şunları söylüyor:

"Bir dosya ilişkilendirmesi aracılığıyla başlatıldığında, RStudio çalışma dizinini otomatik olarak açılan dosyanın dizinine ayarlar." Varsayılan kurulum, RStudio'nun .R dosyaları için bir işleyici olarak kaydedilmesidir, ancak .Rdata ve .R uzantıları için RStudio ile varsayılan bir "ilişkilendirme" ayarlama yeteneğinden de bahsedilir. Linux'ta 'işleyici' ve 'ilişkilendirme' statüsünün aynı olup olmadığını anlayamıyorum.

http://www.rstudio.com/ide/docs/using/workspaces

dirname(parent.frame(2)$ofile)  

benim için de çalışmıyor, ancak aşağıdakiler ( https://stackoverflow.com/a/35842176/992088'de önerildiği gibi ) ubuntu 14.04'te benim için çalışıyor

dirname(rstudioapi::getActiveDocumentContext()$path)

UTF-8 kodlamasını kullanmanız durumunda:

path <- rstudioapi::getActiveDocumentContext()$path
Encoding(path) <- "UTF-8"
setwd(dirname(path))

Henüz yapmadıysanız rstudioapi paketini kurmanız gerekir.

İşte bunu yapmanın başka bir yolu:

set2 <- function(name=NULL) {
  wd <- rstudioapi::getSourceEditorContext()$path
  if (!is.null(name)) {
    if (substr(name, nchar(name) - 1, nchar(name)) != '.R') 
      name <- paste0(name, '.R')
  }
  else {
    name <- stringr::word(wd, -1, sep='/')
  }
  wd <- gsub(wd, pattern=paste0('/', name), replacement = '')
  no_print <- eval(expr=setwd(wd), envir = .GlobalEnv)
}
set2()