Dear list, Consider these two parallel segments in a plot. plot(c(1, 6), c(2, 2), type="n", xlim=c(0, 7), ylim=c(-2, 6)) segments(1, 1, 6, 1) segments(1, 3, 6, 3) How can I rotate the two lines together by a defined angle? Thank you all in advance. Best, Antonio ________________________ Antonio Rivero Ostoic Assistant professor, PhD AARHUS UNIVERSITY School of Business and Social Science Quantitative Analytics Group and Cognition and Behaviour Lab Bartholins All? 10 DK-8000 Aarhus C T: +45 871 65421 M: jari at asb.dk????????
Rotation of parallel lines
3 messages · Tonio, David Winsemius, Carl Witthoft
On Nov 18, 2013, at 7:27 AM, Tonio wrote:
Dear list, Consider these two parallel segments in a plot. plot(c(1, 6), c(2, 2), type="n", xlim=c(0, 7), ylim=c(-2, 6)) segments(1, 1, 6, 1) segments(1, 3, 6, 3) How can I rotate the two lines together by a defined angle?
Base graphics do not support object operations. You need to do the calculation and redraw the plot. Either lattice or ggplot2 which depend upon the "grid" system would have the possibility to "rotate" a component.
David Winsemius, MD Alameda, CA, USA
See my answer at Stack Overflow -- repeated here for anyone else who wants a
trivial function.
# coordinate transform: cartesian plane rotation
xyrot<-function(pairs,ang){
# pairs must be Nx2 matrix w/ x in first column and y in second
xrot <- pairs[,1]*cos(ang) - pairs[,2]*sin(ang)
yrot <- pairs[,1]*sin(ang) + pairs[,2]*cos(ang)
return(invisible(cbind(xrot,yrot)))
}
tonio wrote
Dear list, Consider these two parallel segments in a plot. plot(c(1, 6), c(2, 2), type="n", xlim=c(0, 7), ylim=c(-2, 6)) segments(1, 1, 6, 1) segments(1, 3, 6, 3) How can I rotate the two lines together by a defined angle? Thank you all in advance. Best, Antonio
________________________ Antonio Rivero Ostoic Assistant professor, PhD AARHUS UNIVERSITY School of Business and Social Science Quantitative Analytics Group and Cognition and Behaviour Lab Bartholins All? 10 DK-8000 Aarhus C T: +45 871 65421 M:
jari@
????????
______________________________________________
R-help@
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.
-- View this message in context: http://r.789695.n4.nabble.com/Rotation-of-parallel-lines-tp4680676p4680695.html Sent from the R help mailing list archive at Nabble.com.