Conversion of 3d Cartesian coordinates to polar coordinates

The function uses basic trigonometric relationships to transform XYZ coordinates to polar coordinates

Usage

CarToPol(x, ...)

# S4 method for class 'matrix'
CarToPol(x, norad = FALSE, origin = c(0, 0, 0))

# S4 method for class 'numeric'
CarToPol(x, norad = FALSE, origin = c(0, 0, 0))

# S4 method for class 'data.frame'
CarToPol(x, norad = FALSE, origin = c(0, 0, 0))

Arguments

x

(matrix, data.frame, numeric) A 3 column data matrix with XYZ coordinates in Cartesian space.

...

Arguments passed to class-specific methods.

norad

(logical). Toggles whether the rho coordinate (distance from origin) should be omitted from the output.

origin

(numeric) Vector with length 3, the XYZ coordinates of the sphere center.

Value

A 3-column or 2-column numeric, matrix or data.frame with longitude, latitude and, if set accordingly, radius data.

Examples

# some random points
xyz <- rbind(
  c(6371, 0,0),
  c(0, 6371,0),
  c(1000,1000,1000)
)

# conversions
  CarToPol(xyz)
#>      long      lat      rho
#> [1,]    0  0.00000 6371.000
#> [2,]   90  0.00000 6371.000
#> [3,]   45 35.26439 1732.051