Displaying 1 result from an estimated 1 matches for "arrowl".
Did you mean:
arrow
2009 Jan 19
2
plotting arrows with different colors and varying head size
...will be greatly appreciated.
## Generate random data
set.seed(1)
xcoor <- matrix(runif(20), ncol=5)
ycoor <- matrix(runif(20), ncol=5)
u <- matrix(rnorm(20)/10, ncol=5)
v <- matrix(rnorm(20)/10, ncol=5)
## calculate arrows length and look histogram
arrowlen <- sqrt(u^2 + v^2)
hist(arrowlen)
## recode arrow lengths (by interval) into colors
## sorry, I don't know how to do it without the car package
library(car)
arrowL <- recode(as.vector(arrowlen),
"0='grey90';...