Displaying 1 result from an estimated 1 matches for "maxwind".
Did you mean:
maxmind
2011 Dec 12
3
windrose color ramp issue
...quot;yellow","orange","red","darkred","violetred","mediumorchid","purple")
#or 2) Making the pedal colors dynamic based on the increments and the
max wind speed.
incrspeeds = 2 # fills out the increments argument
breaks=seq(0,round(maxwind),incrspeeds) # maxwind is the maximum wind speed
numcolors=length(breaks)
if(numcolors>length(pedalcolors)){
pedalcolors=rev(rainbow(numcolors))
}
# In either case the result ends up in the wind rose function
rose=windrose(wr,breaks=NULL,bins=numpedals,increment=incrspeeds,main=NULL,fill.col=...