Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- data = {{4, 5}, {6, 7}, {9, 8}};
- r[angle_?NumericQ, pivot:{_?NumericQ, _?NumericQ}] = RotationTransform[angle Degree, pivot];
- r[45, {1, 1}] /@ data // N
- {{0.292893, 5.94975}, {0.292893, 8.77817}, {1.70711, 11.6066}}
Add Comment
Please, Sign In to add comment