是否可以使用定位器添加箭头?我尝试了一下,但没有运气....
plot(1:3)
arrows(x0=locator(1), x1=locator(1),
y0=locator(1), y1=locator(1), code=1)#single headed arrow
最佳答案
如果您查看 locator(1)
返回的内容,您就会明白为什么这还不能正常工作:
> locator(1)
$x
[1] 1.365533
$y
[1] 2.25695
因此,您向每个参数传递了一个长度为 2 的列表。我可能会(虽然这不会重现,所以我不会在任何分析中真正生气地这样做)通过以下方式解决这个问题:
> locs <- locator(2)
> locs
$x
[1] 1.265845 1.587567
$y
[1] 2.604642 2.267028
使用 locs
中保存的数据添加箭头:
with(locs, arrows(x0=x[1], x1=x[2], y0=y[1], y1= y[2], code=1))
关于r - 在 R 中使用 locator() 向绘图添加箭头,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12502910/