Hello,
I need some help with a 4D-Plot.
Here is my code:
Lab.palette <-
colorRampPalette(c("blue","turquoise","green","yellow","orange","red","violet"),space
= "Lab")
par(las=3,omi=c(0.8,0.1,0.1,0.1))
filled.contour(x,log10(y),log10(z=daten),col=Lab.palette(27),zlim =
c(0,max(log10(daten))),plot.title="Unkorrigierte Mobilit?ten von
Staub",
ylab="Gr??enklassen",key.title="",
plot.axes={axis(2,at=log10(ytick),label=ytick)
axis(1,at=seq(min(datetime),max(datetime),by="3
hour"),label=seq(min(datetime),max(datetime),by="3 hour"),las=3)
contour(x,log10(y),log10(z=daten),col="darkgrey",zlim =
c(min(log10(daten)),0),add=TRUE)})
You can see the plot in plot1.jpg. My Problem: Normally I need a second
filled.contour()for the grey area on my first one. But it doesn`t work.
When I use image() instead of contour() it`s looking really bad (I don`t know
why) because of the white areas. You can see this in plot2.jpg.
Do you know how I can realize a full filled plot like this without any left
white spaces?
Additionally I want to change the label of the legend (because of log10() the
label was changed). How I can do that?
It would be really nice, if you could help me! Thanks very much!!
Greetings
Andrea Spitzner