Displaying 1 result from an estimated 1 matches for "bopeechee".
2002 May 03
0
copy or save to metafile from graphics device shrinks plots (PR#1507)
...","yaxp"))
segments(plot.limits$xaxp[1],plot.limits$yaxp[2],
plot.limits$xaxp[1]+100,plot.limits$yaxp[2],lwd=3)
text(x=plot.limits$xaxp[1]+50,y=plot.limits$yaxp[2]-5,adj=c(0.5,1),labels=c("100
m"))
mtext("C",side=2,cex=2,las=2,at=par("yaxp")[2])
attach(bopeechee.zeidleri)
plot(easting,northing,type="n",bty="n",
axes=FALSE,xlab="",ylab="")
filled <- occupied == 1
points(easting[filled],northing[filled],
pch=19,cex=log10(area[filled]))
points(easting[!filled],northing[!filled],
pch=21,cex=log10(area[!filled]))
detac...