E3: To calculate 1-e^2*sen(lat)^2.

Description Usage Arguments Value Note References Examples

View source: R/E3.R

Description

To calculate the value for the function 1-e^2*sen(lat)^2.

Usage

1
E3(x, y, digits = 4)

Arguments

x

Selection of Ellipsoid.

y

Latitude in radians.

digits

Number of digits the seconds are rounded to. DEFAULT: 4

Value

value

Note

create data frame of epsg codes by epsg <- rgdal::make_EPSG()

References

https://github.com/OSGeo/PROJ & https://github.com/cran/rgdal

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
# Lat
g <- -33
m <- 38
s <- 30.123456

rad_lat <- radians(g, m, s)
print(rad_lat)

# To know the ellipsoids and the order open the Ellipsoids in the package and look for it number
Ellip <- Ellipsoids
#View(Ellip)

# We choose the number 5 which is GRS80
value <- E3(5, rad_lat, digits = 4)
print(value)

GeodesiCL documentation built on May 25, 2021, 5:10 p.m.