0
Как построить график на основе плотности
Я хочу сделать пространственный участок. Я сделал сюжет. Я использовал разные цвета для идентификации разных значений. Но, я хочу разные оттенки одного цвета. Есть ли способ построить один и тот же сюжет с использованием разных оттенков одного и того же цвета на основе более высоких значений?
library(maps)
C <-88
A <- c(6.79,10.64,11.06,11.59,2.46,10.64,3.22,6.79,6.79,
11.06, 4.82,4.82,6.79,6.79,11.06,3.22,8.12,11.59,
4.82,10.64,8.12,10.64,8.12,8.12,8.12,10.64,2.46,
11.59,4.82,3.22,6.79,10.64,8.12,3.22,10.64,6.79,
2.46,11.06,10.64,2.46,3.22,8.12,11.59,2.46,8.12,
8.12,11.59,10.64,8.12,11.06,8.12,11.06,2.46,10.64,
4.82,3.22,4.82,3.22,8.12,3.22,3.22,10.64,10.64,2.46,
8.12,2.46,11.06,4.82,10.64,11.06,2.46,10.64,2.46,
10.64,4.82,11.06,11.06,11.06, 11.06,8.12, 10.64,2.46,
6.79, 3.22, 11.06, 10.64,10.64,8.12)
A.color <- array(NA,C)
for (i in 1:C) {
if(A[i] == 10.64) A.color[i] <- c("red")
if(A[i] == 11.59) A.color[i] <- c("blue")
if(A[i] == 4.82) A.color[i] <- c("green")
if(A[i] == 8.12) A.color[i] <- c("purple")
if(A[i] == 11.06) A.color[i] <- c("magenta")
if(A[i] == 6.79) A.color[i] <- c("black")
if(A[i] == 2.46) A.color[i] <- c("yellow")
if(A[i] == 3.22) A.color[i] <- c("violet")
}
map("county", "ohio", fill = TRUE, col=A.color[],
border=c(0,0),mar=c(0,0,0,0),main="Undertriage")
title("Undertriage plot by region")
legend("bottomright",legend=c("UT-18.12 %","UT-19.75 %", "UT-8.21 %","UT- 13.84 %","UT-18.85 %", "UT-11.56 %", "UT-4.20 %","UT-5.48 %"),
fill=c("red","blue","green","purple","magenta","black","yellow","violet"),
[![enter image description here][1]][1]bty="n", cex=1.0, horiz=F)
Спасибо большое. но я хочу тот же цвет разной степени, который покажет глубокий красный цвет для более высокой плотности и более светлых оттенков красного цвета при уменьшении плотности. И он покажет бар на стороне, показывая распределение цветов. – Benzamin
Не могли бы вы рассказать мне, как добавить здесь легенду? @ J.R – Benzamin
Да, это не проблема, если вы поставляете данные о том, как легенды связаны с 'A', поэтому нам не нужно делать это вручную, как вы. Затем мы просто сортируем легенду и цвета. –