R格中的扩展箭头

R格中的扩展箭头,r,lattice,R,Lattice,所以我得到了这个伪代码: require(latticeExtra) x<- 1:19 y<- 19:1 zeros <- (1:19)*0 plt <- xyplot(x~y) plt <- plt + layer(panel.arrows(zeros,zeros,x,y,length=.1,col=1:19)) plt require(latticeExtra) x添加一个多层: x <- 1:19 y <- 19:1 zeros <- (1

所以我得到了这个伪代码:

require(latticeExtra)
x<- 1:19
y<- 19:1
zeros <- (1:19)*0
plt <- xyplot(x~y)
plt <- plt + layer(panel.arrows(zeros,zeros,x,y,length=.1,col=1:19))
plt
require(latticeExtra)
x添加一个多层:

x <- 1:19
y <- 19:1
zeros <- (1:19)*0
plot(y~x)
arrows(x0=zeros,y0=zeros,x1=x*2,y1=y*2,col=1:19)

x我认为你需要更具体地说明你想要什么。更改箭头长度所需做的就是使用一些基本几何图形更改
x
y
向量。没错,我可以用其他值替换x和y值。我只是希望有一种方法可以将ling向外延伸更多,所以在我的真实数据中,如果点太靠近原点,我就可以放大线,我看不到它是什么样子。是的,这是我最后基本上做的,只是在晶格等价物中。标记每个箭头/线的最简单/最漂亮的方法是什么?