Convert Cartesian Vector to Equatorial Coordinates
Source:R/coordinates.R, R/rotation.R
astro_equator_from_vector.RdGiven an equatorial vector, calculates equatorial angular coordinates (right ascension and declination).
Given an equatorial vector, calculates equatorial angular coordinates (right ascension and declination).
Value
A list representing equatorial coordinates with elements:
ra: Right ascension in sidereal hours (0-24)dec: Declination in degrees (-90 to +90)dist: Distance in AUvec: The original vectorstatus: Status code (0 = success)
A list with components:
- ra
Right ascension in sidereal hours
- dec
Declination in degrees
- dist
Distance to the celestial body in AU
- vec
Equatorial coordinates in Cartesian vector form
- status
Status code (0 = success)
Examples
vec <- list(x = 1, y = 0.5, z = 0.25, t = as.POSIXct("2024-01-01", tz = "UTC"))
equ <- astro_equator_from_vector(vec)
# Convert vector to equatorial coordinates
vec <- list(x = 1, y = 0, z = 0, t = as.POSIXct("2024-01-01", tz = "UTC"))
equ <- astro_equator_from_vector(vec)