Перевести радианы в градусы / градусы в радианы

Question

Есть ли в R встроенные функции для преобразования радиан в градусы и градусы?

Пока я написал свои собственные функции:

rad2deg <- function(rad) {(rad * 180) / (pi)}
deg2rad <- function(deg) {(deg * pi) / (180)}

#test:
rad2deg(pi) #180
rad2deg(2*pi) #360
deg2rad(180) #pi

Answer 1

Комментарий Паскаля был очень полезен, и я нашел несколько, например

install.packages("NISTunits", dependencies = TRUE)
library(NISTunits)

NISTdegTOradian(180)
NISTradianTOdeg(pi)

Answer 2

Вы можете использовать units пакет для этого.

library(units)
pi_rad <- as_units(pi, "radians")
pi_deg <- set_units(pi_rad, "degrees")
set_units(pi_deg, "radians")

Answer 3

Если у вас есть data.frame Это может помочь вам

В моем случае davis_2$wd - это столбец в степени

#Add column to Data Base
davis_2$radian_wd = davis_2$wd

#Create a loop to change the data, and change the 62'th col to Radians
for(i in 1:nrow(davis_2)){
    davis_2[i, 62] = (davis_2[i, 62]*pi)/180
}
# Review
head(davis_2$radian_wd)