发帖之后请不要给我发邮件。
以下是邮件回复:
1、设置par(lend = 1);那不是圆点,只是线段的端点样式为圆角而已。1表示直接截断,不要画圆角。
3、png()放在整个画图代码*之前*!画完图之后要关掉png设备dev.off()
下次问题请发论坛:http://cos.name/cn/ 谢谢
2011/4/23 ** <***@163.com>:
>
>
> 附件是其中一张图。我的目的是想通过图中每列的线段长度来比较相对大小,但是发现有3个问题不能理解:1.
> 线段的两端有点(而其实在两列之间我都有留1个单位空白空间的);2.
> 图中出现圆点的地方应该是没有图形的(后来在0值处设置了NA,单圆点是不显示了,但线段两端仍不平整);3.
> 我自定义了导出图片的长宽,但是保存的图只有白色的背景。
>
> 想知道是哪里出了问题,或者这样的图可以怎么实现呢?
>
> 列出我的语句,请谢老师帮忙。谢谢!
>> x0<-rep(0,10)
>> y0<-seq(1,10,1)
>> plot(x,y,xlim=c(0,85),ylim=c(0,10),typ='n',xaxt="n",yaxt="n",xlab="Wild
>> Populations",font.lab=2,ylab="Artificial Poulations",font.lab=2,bty="l")
>> title(main="Assignment
>> Test",col.main="black",font.main=1,cex.main=2,adj=0.5) #TITLE 居中,加粗
>> x1<-c(1,6,3,1,3,1,2,NA,10,1)
>> y1<-y0
>> segments(x0,y0,x1,y0,col=1,lwd=11)
>> x2<-rep(11,10)
>> x3<-c(19,12,15,13,15,18,15,20,15,14)
>> segments(x2,y0,x3,y0,col=2,lwd=11)
> ..........................
> ......................
> ..................
>
> png(filename="E:/R/Assignment0423.png",height=360,width=800,bg="lightgray")
>