A1: 1
B1: 2
B2: 1
A2: 0
S: {{A1, B1}, {A2, B2}}
O = Intersect(xAxis, yAxis)
P = (1, 2)
u = Vector(O, P)
v = ApplyMatrix(S, u)
θ = 1.6755160819145563 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
R: {{cos(θ), (-sin(θ))}, {sin(θ), cos(θ)}}
w = ApplyMatrix(R, u)
u' = ApplyMatrix(R, u)