Tüm materyaller.
Tek indirme.

ZIP'i nereye açtığını hatırlaman gerekmez. Downloads içinde çıkarılmış en güncel R-Lab/TEST_ET.R dosyasını bulur, doğru klasöre geçer ve altı dersin kabul testini çalıştırır.

# FERDO R LAB — Downloads'tan tüm teknik kabul testlerini başlat
# Windows: ZIP'i Downloads'a çıkar. RStudio Console'da bu dosyayı source et.
# Tek seferde Ders 1-6 kabul testlerini çalıştırır; ödevleri notlamaz.

indirilenler <- file.path(Sys.getenv("USERPROFILE"), "Downloads")
if (!dir.exists(indirilenler)) {
  indirilenler <- file.path(path.expand("~"), "Downloads")
}
if (!dir.exists(indirilenler)) {
  stop("Downloads klasörü bulunamadı.")
}

testler <- list.files(
  indirilenler,
  pattern = "^TEST_ET[.]R$",
  recursive = TRUE,
  full.names = TRUE,
  ignore.case = TRUE
)
testler <- testler[
  tolower(basename(dirname(testler))) == "r-lab"
]
if (!length(testler)) {
  stop("Downloads altında çıkarılmış R-Lab/TEST_ET.R bulunamadı. ZIP'i tamamen çıkar.")
}
# Birden fazla kopya varsa en son değişen dosyayı seç.
test_dosyasi <- testler[which.max(file.info(testler)$mtime)]
ana_klasor <- dirname(dirname(test_dosyasi))

onceki_klasor <- getwd()
tryCatch({
  setwd(ana_klasor)
  cat("Bulunan paket: ", normalizePath("R-Lab"), "\n", sep = "")
  source("R-Lab/TEST_ET.R", encoding = "UTF-8")
}, finally = {
  setwd(onceki_klasor)
})

Bu komutu ayrıca .R dosyası olarak indir

downloads-test.R ne işe yarar? Gerekli mi?

Bu dosya, yukarıdaki Downloads'tan otomatik bulma kodunun indirilebilir .R sürümüdür. Her seferinde uzun kodu Console'a kopyalamak yerine bu dosyayı bir kez indirip RStudio'da açabilir, Source düğmesiyle çalıştırabilirsin.

Çalıştırıldığında Downloads içinde ZIP'ten çıkarılmış R-Lab/TEST_ET.R dosyasını arar, gereken çalışma klasörüne geçer, asıl toplu testi başlatır ve eski çalışma klasörüne döner. Ders 1–6 için ayrı PASS / HATA çıktısını asıl TEST_ET.R üretir.

İki dosyanın farkı: downloads-test.R kolaylaştırıcı başlatıcıdır; R-Lab/TEST_ET.R ise ZIP arşivinin içinde zaten bulunan, derslerin teknik kabul testlerini yürüten asıl dosyadır.

Şu anda zorunlu değil. Zaten Ders 1–6 için PASS: 6 / 6 sonucunu aldın. Ancak yeni bir ders paketi yayımlanırsa, başka bir bilgisayarda test yaparsan veya dosya yollarını tekrar ayarlamak istemezsen kolaylık sağlar. Bu test başlatıcısı şu anda yalnızca Ders 1–6 kapsamındadır; ileride Ders 7 eklenirse test listesinin de güncellenmesi gerekir.

downloads-test.R dosyasını indir

RStudio çalışma dizini R-Lab klasörünün bir üst klasörüyse (ör. Downloads/ferdo-r-lab-tum-materyaller/) tek satır yeterlidir.

source("R-Lab/TEST_ET.R")

Bu komutun çalışması için file.exists("R-Lab/TEST_ET.R") sonucunun TRUE olması gerekir.

cannot open, file not found veya ZIP BULUNAMADI görürsen önce RStudio çalışma dizinini ve dosya yollarını incele.

getwd()
file.exists("R-Lab/TEST_ET.R")
list.files("R-Lab", pattern = "[.]zip$", recursive = TRUE)

Dosya bulunmuyorsa Windows Dosya Gezgini ile ZIP'in gerçekten çıkartıldığını kontrol et. İlk komut bu durumda daha kolaydır.

İlgili ders ZIP'ini ayrıca çıkart ve RStudio çalışma dizinini o ders paketinin köküne getir. Ders 2–6'da aynı komut kullanılır.

source("scripts/acceptance_test.R")

Örneğin Ders 4'ün içindeki data/ ve scripts/ klasörleri aynı paket kökünde bulunmalıdır. Ders 1'in kabul testi farklı dosya adındadır; onun için toplu test yöntemini kullanabilirsin.