将弧度转换为度数/度数转换为弧度答案

【问题标题】：Convert radians to degree / degree to radians将弧度转换为度数/度数转换为弧度
【发布时间】：2015-11-28 23:38:01
【问题描述】：

R中是否有内置函数可以将弧度转换为度数和度数到弧度？

到目前为止，我编写了自己的函数：

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

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

【问题讨论】：

install.packages("sos", dependencies = TRUE); library(sos); findFn("convert degree to radian").
非常有用！谢谢@Pascal
我有点惊讶，这么多年过去了，R 没有内置函数来转换度数和弧度！我们必须安装扩展来支持它吗？在这一点上，我宁愿采取OP的解决方案来实现我所需要的

标签： r math degrees radians

【解决方案1】：

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

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

NISTdegTOradian(180)
NISTradianTOdeg(pi)

【讨论】：

【解决方案2】：

您可以为此使用units 包。

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

【讨论】：

【解决方案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)

【讨论】：

不用写循环：davis_2$radian_wd <- (davis_2$radian_wd*pi)/180就够了