Hi there,

 

I produced a plot using the following codes:

 

y<-rnorm(1000, 2, 0)

x0<-c(0, 0)

y0<-c(0, 0)

y1<-c(0, 1)

x1<-c(0, 4)

plot(density(y), ylab="Abundance of species", xlab="Environmental
gradient", main=" ", 

   xlim=c(0, 4), ylim=c(0, 1), lty=2, col=4, xaxt="n", yaxt="n",
frame.plot=F)

lines(x0, y1) # add an axis

lines(x1, y0) # add an axis

arrows(3.95, 0, 4, 0,  angle = 15, length = 0.1)

arrows(0, 0.98, 0, 1,  angle = 15, length = 0.1)

 

Please help me to remove the grey horizontal line and put the axis
labels closer to the axes. And also appreciate any suggestions on how to
make those arrows look nicer, e.g. a filled small arrow for each axis,
like what from points(0, 1,   pch=17), but a slightly narrowed one.
Thanks.

 

Regards,

 

Jin Li

========================

Jin Li, PhD

Climate Impacts Modeller

CSIRO Sustainable Ecosystems

Atherton, QLD 4883, Australia

========================

 


	[[alternative HTML version deleted]]


