Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
for ( i in 1:length(a$y) ) { if (a$y[i] > 0 & a$y[i] >= 2000) { fill_colors <- c(fill_colors, "#71b84f") if (a$y[i] >= 10000 & a$y[i] > 2000) { fill_colors <- c(fill_colors, "#9e1515") } } else { fill_colors <- c(fill_colors, "#cccccc") } }