R/p2p_arrows.R

Defines functions p2p_arrows

Documented in p2p_arrows

p2p_arrows<-function(x1,y1,x2,y2,space=0.05,col=par("fg"),...) {
 xspace<-(x2-x1)*space
 yspace<-(y2-y1)*space
 arrows(x1+xspace,y1+yspace,x2-xspace,y2-yspace,...)
}
plotrix/plotrix documentation built on Feb. 19, 2024, 8:16 a.m.