R sin() 函数 - 三角函数计算
R 提供了一套完整的三角函数:sin()、cos()、tan() 以及它们的反函数。
这些函数默认使用弧度制(radians),在科学计算和信号处理中频繁使用。
三角函数语法格式如下:
sin(x) cos(x) tan(x) asin(x) # 反正弦 acos(x) # 反余弦 atan(x) # 反正切
参数说明:
x 输入弧度值(radians)。
实例
# 常用角度的三角函数值
angle_deg <- c(0, 30, 45, 60, 90)
# 将角度转换为弧度
angle_rad <- angle_deg * pi / 180
# 计算正弦值
print("sin 值:")
print(round(sin(angle_rad), 4))
# 计算余弦值
print("cos 值:")
print(round(cos(angle_rad), 4))
# 计算正切值
print("tan 值(注意 90 度无穷大):")
print(round(tan(angle_rad), 4))
angle_deg <- c(0, 30, 45, 60, 90)
# 将角度转换为弧度
angle_rad <- angle_deg * pi / 180
# 计算正弦值
print("sin 值:")
print(round(sin(angle_rad), 4))
# 计算余弦值
print("cos 值:")
print(round(cos(angle_rad), 4))
# 计算正切值
print("tan 值(注意 90 度无穷大):")
print(round(tan(angle_rad), 4))
执行以上代码输出结果为:
[1] "sin 值:" [1] 0.0000 0.5000 0.7071 0.8660 1.0000 [1] "cos 值:" [1] 1.0000 0.8660 0.7071 0.5000 0.0000 [1] "tan 值(注意 90 度无穷大):" [1] 0.0000 0.5774 1.0000 1.7321 Inf
使用反正切函数 atan2() 可以计算平面上点 (x, y) 的极角:
实例
# 计算点(1,1) 的极角(应为 45 度)
angle_rad <- atan2(1, 1)
angle_deg <- angle_rad * 180 / pi
print(paste("点(1,1)的角度:", angle_deg, "度"))
# 计算点(-1, 1) 的极角(应为 135 度)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("点(-1,1)的角度:", angle_deg, "度"))
angle_rad <- atan2(1, 1)
angle_deg <- angle_rad * 180 / pi
print(paste("点(1,1)的角度:", angle_deg, "度"))
# 计算点(-1, 1) 的极角(应为 135 度)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("点(-1,1)的角度:", angle_deg, "度"))
执行以上代码输出结果为:
[1] "点(1,1)的角度: 45 度" [1] "点(-1,1)的角度: 135 度"

R 语言实例