使用颜色作为第三维

Question

我有3个要绘制的维度，我希望第三维是彩色的。

这将在R中。例如，我的数据是这样的

x = [1,2,3,4,1,5,6,3,4,7,8,9] 
y = [45,32,67,32,32,47,89,91,10,12,43,27] 
z = [1,2,3,4,5,6,7,8,9,10,11,12] 

我想使用filled.contour，但它给我一个错误说x和y必须是递增的顺序。但我并不确定如何安排我的数据，以确保这一点。因为如果我按递增顺序排列x，那么y将不会按递增顺序排列。

对于我来说做一个没有填充的轮廓方法也是可行的，它只是数据点被着色。我如何在R中做到这一点。任何建议的软件包？请使用具体的例子。谢谢！

Answer 1

jet.colors <- 
    colorRampPalette(c("#00007F", "blue", "#007FFF", "cyan", 
         "#7FFF7F", "yellow", "#FF7F00", "red", "#7F0000")) 
plot(x,y, col=jet.colors(12)[z], ylim=c(0,100), pch=20, cex=2) 
legend(8.5,90, col = jet.colors(12)[z], legend=z, pch=15) 

如果你要检查的着色你可以用Z值标记点：

text(x, y+2, labels=z) #offset vertically to see the colors 

另一种选择是使用包装：阿克玛这确实不规则插值（non）-grids：

require(akima) 
require(lattice) 
ak.interp <- interp(x,y,z) 
pdf(file="out.pdf") 
levelplot(ak.interp$z, main="Output of akima plotted with lattice::levelplot", contour=TRUE) 
dev.off()