Skip to main content
Added a link to ATO
Source Link
Glory2Ukraine
  • 3.2k
  • 3
  • 12
  • 33

R, 3331 bytes

f=\(a,b,c,d)atan2(d-b,c-a)/pi*180 
\(a,b,c,d)atan2(d-b,c-a)/pi*180 

A built-in atan2 function.

Attempt This Online!

result:

> f(5,5,5,-5) [1] -90 > f(5,-5,5,5) [1] 90 

R, 33 bytes

f=\(a,b,c,d)atan2(d-b,c-a)/pi*180 

result:

> f(5,5,5,-5) [1] -90 > f(5,-5,5,5) [1] 90 

R, 31 bytes

\(a,b,c,d)atan2(d-b,c-a)/pi*180 

A built-in atan2 function.

Attempt This Online!

result:

> f(5,5,5,-5) [1] -90 > f(5,-5,5,5) [1] 90 
Source Link
Glory2Ukraine
  • 3.2k
  • 3
  • 12
  • 33

R, 33 bytes

f=\(a,b,c,d)atan2(d-b,c-a)/pi*180 

result:

> f(5,5,5,-5) [1] -90 > f(5,-5,5,5) [1] 90