Цикл в R с использованием вставки для построения графиков - PullRequest
0 голосов
/ 25 октября 2019

Графика получается пустой.

Мне нужно построить несколько графиков из анализа GBM, поэтому я использую цикл вместе с функцией вставки.

Но все ли графики выходятпустой? Что это может быть? При выполнении кода из цикла все работает. Спасибо

list <- list("A","B", "C")

for (i in list) {

df <- fread(paste("data_", i, ".csv", sep = ""), header = TRUE)

gbm.fit <- gbm( formula = y ~ ., distribution = "gaussian", data = train,n.trees = 1000, interaction.depth = 5, shrinkage = 0.1, cv.folds = 5, n.cores = NULL, verbose = FALSE )

pathname <- paste("gbm", i, ".tiff", sep = "")
tiff( file = pathname, width = 1200, height = 1000, res = 105 )

vip( gbm.fit, num_features = 15, bar = TRUE, width = 0.75, horizontal = TRUE, color = hcl.colors( 15, palette = "Greens2", alpha = NULL, rev = FALSE, fixup = TRUE ), fill = hcl.colors( 15, palette ="Greens", alpha = NULL, rev = TRUE, fixup = TRUE ) )

dev.off()

}

Я бы хотел, чтобы графика получала правильное содержание

...