将弧度转换为度/度到弧度

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

Pascal的评论非常有用，我找到了几个，例如

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

NISTdegTOradian(180)
NISTradianTOdeg(pi)

Answer 2

如果您有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)

Answer 3

您可以使用units软件包。

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