CODEWITHSUNDEEP
wolfram-mathematica
RIP
RIP

Reputation: 117

Mathematica: Rotating one point around another

I wonder if it's possible to rotate one point around other existing point in Mathematica. I've tried to do something like this:

one = Graphics[Point[{1, 1}]];
two = Graphics[Point[{2, 2}]];
two = Rotate[{two}, 60 Degree, {one}]

But it doesn't work. Is it even possible to do? Thanks!

Upvotes: 0

Views: 162

Answers (1)

Alan
Alan

Reputation: 9620

one = {1, 1};
two = {2, 2};
Graphics[{Point@one, Point@two, Rotate[Point@two, 60 Degree, one]}]

Upvotes: 1

Related Questions