Bootstrap hatası
Bir klinik laboratuvarda R programcısı olarak çalışıyorsun. Laboratuvardaki istatistikçi, farklı fare türlerinin ortalama ağırlıkları için aralıklar belirlemek üzere geniş çaplı bir analiz yürütüyor. bootstrap() adlı bir fonksiyon yazmış ve bunu, bir futures backend kullanarak paralel şekilde weight_list içindeki her elemana uygulamış. Ancak kod şu hatayı veriyor:
Error in checkForRemoteErrors(val) :
one node produced an error: missing values and NaN's not allowed if 'na.rm' is FALSE
weight_list içinde hataya neden olan elementi bulamıyor. Ayrıca zaman alıcı hesaplamanın tüm sonuçlarını kaybediyor. Senden kodu düzeltmen istendi. furrr paketi senin için yüklendi ve futures için multisession planlandı.
Bu egzersiz, kursun bir parçasıdır
R'da Paralel Programlama
Egzersiz talimatları
- Süslü parantezlerin içindeki kodu, hatayı yakalayabilecek bir fonksiyona ver.
errorargümanına, tek argüman alan (e) ve"Error here!"dizgesini döndüren bir fonksiyon ver.bootstrap()fonksiyonunuweight_listiçindeki tüm elementlere birfurrrfonksiyonu kullanarak eşle.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
bootstrap <- function (x) {
# Supply code to a function for catching errors
___({est <- rep(0, 1e3)
for (i in 1:1e3) {
b <- sample(x, replace = T)
est[i] <- mean(b)
}
return(quantile(est, c(0.25, 0.75)))
# Supply a function that returns a string
}, error = ___
)
}
# Map bootstrap() to every element of weight_list
___(___, ___)
plan(sequential)