第一,xpd=NA,否则绘制箭头只会显示一半
xpd参数说明:A logical value or NA. If FALSE, all plotting is clipped to the plot region, if TRUE, all plotting is clipped to the figure region, and if NA, all plotting is clipped to the device region.
第二,横纵坐标由于默认是多增加4%的区间,因此要么设置xaxs=“仔扰i" 和 yaxs ="i",让坐标轴交于结束位置
或者直接用par()['usr'][[1]] 找出绘制的起点和终点
在R语言中,这两个参数的取值包括 5种,其中"轮闷r"是默认值,就是我们上边讲到的添加4%的一个距离,"i" 代表的念桐旦行为是原始数据的最小值到最大值是多少,对应的坐标轴的起始和终止位置就是多少
举例:par(xpd=NA)
plot(c(1:10),c(1:10),type="l",bty="l",xlab="X",ylab="Y")
ord<-par("usr")
arrows(x0 = ord[1],y0=ord[3],x1=ord[2]*1.05,y1=ord[3])
arrows(x0 = ord[1],y0=ord[3],x1=ord[1],y1=ord[4]*1.05)
绘制
1、在画图软件里要画出箭头,那么可先点击画图软件左侧的多边形工具,然后按住鼠标先在画布上拉出一个三角形。
2、然后再点击左侧的那个颜色添充工具,在下面色板上选好一个颜色,再在画出的三角形上点击一下鼠标左键,这样就上了一个色块。
3、如果这个三角形画得不整齐,那么可再点击那个选定工具,然后拉动选框把三角多出的部件选中,再按下Delete键删除。
4、点击那个直线工具,再在下面选好线条的粗线后,按住Shift键再按住毁渗鼠纤咐脊标,在三角形后面拉出一直线。
5、如果觉得这直线还是太细,那么可以选择矩形工具,然后在下面选择实心矩形,这样在三角形后面拉出一个适合的矩形即可,现在一个箭头就画出来了。
6、如简孙果要画圆形箭头,那么可以先点击椭圆工具,按住鼠标画出一个窄形椭圆,再点选定工具,选定椭圆的一部分删除。
7、同样再选用直线或矩形工具给这个删除来的图形画上一个尾端,这样一个圆形箭头就画出来了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)