У меня есть список из 9 матриц, и следующий код выбирает каждую матрицу и строит гистограмму.Затем каждый график записывается с использованием dev.copy.Без цикла код работает отлично, но с циклом только 9-й элемент записывается 9 раз.
Любая помощь будет принята с благодарностью.
for (j in 1:9) {
ggplot(temp.melt.list[[j]], aes(x=Variables, y=Rate, fill=factor(Values))) +
geom_bar(stat="identity", position="fill", colour="black") +
scale_fill_manual(values = c("darkgrey","red","blue","tomato","skyblue1")) +
theme(axis.text.x = element_text(angle = 90, hjust = 1))
dev.copy(png, paste0('Cluster_', j , '_Count_stacked.png'), width = 1400, height = 1000)
dev.off()
}