make.xyz | R Documentation |
Creata an xyz object for use with the functions draw.barplot2D
and draw.pie
make.xyz(x, y, z, group, FUN = sum, ...)
x, y |
vector with x and y-locations of the 2D barplots or pies to be plotted. |
z |
vector (same length as |
group |
factor (same length as |
FUN |
function to apply to the |
... |
optional arguments to |
Hans Gerritsen
draw.barplot2D
and draw.pie
data(landings)
data(coast)
xlim <- c(-12,-5)
ylim <- c(50,56)
xyz <- make.xyz(landings$Lon,landings$Lat,landings$LiveWeight,landings$Species)
col <- rainbow(5)
basemap(xlim, ylim, main = "Species composition of gadoid landings")
draw.shape(coast, col="cornsilk")
draw.pie(xyz$x, xyz$y, xyz$z, radius = 0.3, col=col)
legend.pie(-13.25,54.8,labels=c("cod","had","hke","pok","whg"), radius=0.3, bty="n",
col=col, cex=0.8, label.dist=1.3)
legend.z <- round(max(rowSums(xyz$z,na.rm=TRUE))/10^6,0)
legend.bubble(-13.25,55.5,z=legend.z,round=1,maxradius=0.3,bty="n",txt.cex=0.6)
text(-13.25,56,"landings (kt)",cex=0.8)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.