On Feb 25, 2011, at 4:28 PM, Carl Witthoft wrote:
Just wondering: it appears that "srt" does not accept a vector of
values, just a single value. I ended up using tapply() as the
following code snippet shows, so it's not a major problem. I was
justa little surprised that this argument (srt) differs from things
like "labels," "lty," "col," and so on, all of which accept (and
recycle as needed IIRC) vectors.
Carl
******* code follows *******
dialang<-seq(pi/3,-pi*3/2,by=-pi/6)
d2<-as.character(seq(1,12)) # or roll your own hour tags
plot(c(-1.2,1.2),c(-1.2,1.2),t='n',xlab='',ylab='',
xaxt='n',yaxt='n' )
#trying a rotation w/ srt()
# srt apparently can't handle a vector
invisible(sapply(seq(1,12),FUN=function(x)
text(cos(dialang[x]),sin(dialang[x]),labels=d2[x],srt=-x*30)))
There is a baseGrid package containing baseViewports() that allows you
to align a viewport with the plotting region and then do vectorized
rotation with the angle parameter to viewport()
See:
http://cran.r-project.org/doc/Rnews/Rnews_2003-2.pdf
--
David Winsemius, MD
West Hartford, CT
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.