การไล่ระดับของ n สีตั้งแต่สี 1 และสี 2

ฉันมักจะทำงานกับการggplot2ไล่ระดับสีที่ดี ( คลิกที่นี่เพื่อดูตัวอย่าง ) ฉันมีความต้องการที่จะทำงานในฐานและฉันคิดว่าscalesสามารถใช้ที่นั่นเพื่อสร้างการไล่ระดับสีได้เช่นกัน แต่ฉันไม่ได้ตั้งใจอย่างมาก เป้าหมายพื้นฐานคือสร้างจานสี n สีที่มีตั้งแต่สี x ไปจนถึงสี y การแก้ปัญหาจำเป็นต้องทำงานในฐานแม้ว่า นี่เป็นจุดเริ่มต้น แต่ไม่มีที่ให้ใส่ n

 scale_colour_gradientn(colours=c("red", "blue"))

ฉันตระหนักดีถึง:

brewer.pal(8, "Spectral") 

จากRColorBrewer. ฉันกำลังมองหาวิธีการเพิ่มเติมที่คล้ายกับวิธีggplot2จัดการกับการไล่ระดับสีที่บอกว่าฉันมีสองสีนี้และฉันต้องการ 15 สีไปพร้อมกัน ฉันจะทำเช่นนั้นได้อย่างไร?

colorRampPalette อาจเป็นเพื่อนของคุณที่นี่:

colfunc <- colorRampPalette(c("black", "white"))
colfunc(10)
# [1] "#000000" "#1C1C1C" "#383838" "#555555" "#717171" "#8D8D8D" "#AAAAAA"
# [8] "#C6C6C6" "#E2E2E2" "#FFFFFF"

และเพื่อแสดงให้เห็นว่ามันใช้งานได้:

plot(rep(1,10),col=colfunc(10),pch=19,cex=3)

เพียงเพื่อขยายคำตอบก่อนหน้านี้colorRampPaletteสามารถรองรับได้มากกว่าสองสี

ดังนั้นสำหรับประเภท "แผนที่ความร้อน" ที่ขยายมากขึ้นคุณสามารถ ....

colfunc<-colorRampPalette(c("red","yellow","springgreen","royalblue"))
plot(rep(1,50),col=(colfunc(50)), pch=19,cex=2)

ภาพที่ได้:

ลองทำดังต่อไปนี้:

color.gradient <- function(x, colors=c("red","yellow","green"), colsteps=100) {
  return( colorRampPalette(colors) (colsteps) [ findInterval(x, seq(min(x),max(x), length.out=colsteps)) ] )
}
x <- c((1:100)^2, (100:1)^2)
plot(x,col=color.gradient(x), pch=19,cex=2)

คำตอบข้างต้นมีประโยชน์ แต่ในกราฟยากที่จะแยกแยะระหว่างการไล่ระดับสีดำที่เข้มขึ้น ทางเลือกหนึ่งที่ฉันพบคือการใช้การไล่ระดับสีเทาดังนี้

palette(gray.colors(10, 0.9, 0.4))
plot(rep(1,10),col=1:10,pch=19,cex=3))

ข้อมูลเพิ่มเติมเกี่ยวกับระดับสีเทาที่นี่

เพิ่มแล้ว

เมื่อฉันใช้รหัสด้านบนสำหรับสีที่ต่างกันเช่นสีน้ำเงินและสีดำการไล่ระดับสีไม่ชัดเจน heat.colors()ดูเหมือนมีประโยชน์มากขึ้น

เอกสารนี้มีข้อมูลรายละเอียดและตัวเลือกเพิ่มเติม ไฟล์ PDF