Description Usage Arguments Details Value Author(s) See Also Examples
Given the coordinates of one or more infinite straight lines in the plane, apply a rotation or shift.
1 2 3 4 5 6 7 8 9 10 11 |
X |
Object of class |
angle |
Angle of rotation, in radians. |
vec |
Translation (shift) vector: a numeric vector of length 2,
or a |
... |
Ignored. |
These functions are methods for the generic
shift
, rotate
,
reflect
and flipxy
for the class "infline"
.
An object of class "infline"
represents one or more
infinite lines in the plane.
Another "infline"
object representing the
result of the transformation.
.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | L <- infline(v=0.5)
plot(square(c(-1,1)), main="rotate lines", type="n")
points(0, 0, pch=3)
plot(L, col="green")
plot(rotate(L, pi/12), col="red")
plot(rotate(L, pi/6), col="red")
plot(rotate(L, pi/4), col="red")
L <- infline(p=c(0.4, 0.9), theta=pi* c(0.2, 0.6))
plot(square(c(-1,1)), main="shift lines", type="n")
L <- infline(p=c(0.7, 0.8), theta=pi* c(0.2, 0.6))
plot(L, col="green")
plot(shift(L, c(-0.5, -0.4)), col="red")
plot(square(c(-1,1)), main="reflect lines", type="n")
points(0, 0, pch=3)
L <- infline(p=c(0.7, 0.8), theta=pi* c(0.2, 0.6))
plot(L, col="green")
plot(reflect(L), col="red")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.