Функция sin() в R — тригонометрическое вычисление
R предоставляет полный набор тригонометрических функций: sin(), cos(), tan() и их обратные функции.
Эти функции по умолчанию используют радианы и часто применяются в научных вычислениях и обработке сигналов.
Синтаксис тригонометрических функций выглядит следующим образом:
sin(x) cos(x) tan(x) asin(x) # 反正弦 acos(x) # 反余弦 atan(x) # 反正切
Описание параметра:
xВходное значение в радианах (радианы).
Пример
# Тригонометрические значения стандартных углов
angle_deg <- c(0, 30, 45, 60, 90)
# Преобразование градусов в радианы
angle_rad <- angle_deg * pi / 180
# Вычисление значения синуса
print("значение синуса:")
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("значение синуса:")
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 degrees)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("Угол точки (-1,1):", angle_deg, "degrees"))
angle_rad <- atan2(1, 1)
angle_deg <- angle_rad * 180 / pi
print(paste("Угол точки (1,1):", angle_deg, "градусов"))
# Вычислить полярный угол точки (-1, 1) (должно быть 135 degrees)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("Угол точки (-1,1):", angle_deg, "degrees"))
Выполнение приведённого выше кода даёт следующий результат:
[1] "点(1,1)的角度: 45 度" [1] "点(-1,1)的角度: 135 度"Другие расширения
Примеры на языке R