Fonction R sin() - Calcul trigonométrique
Exemples du langage RR fournit un ensemble complet de fonctions trigonométriques : sin(), cos(), tan() et leurs fonctions inverses.
Ces fonctions utilisent les radians par défaut et sont fréquemment utilisées en calcul scientifique et en traitement du signal.
La syntaxe des fonctions trigonométriques est la suivante :
sin(x) cos(x) tan(x) asin(x) # 反正弦 acos(x) # 反余弦 atan(x) # 反正切
Description du paramètre :
xValeur en radians en entrée (radians).
Exemple
# Valeurs trigonométriques des angles courants
angle_deg <- c(0, 30, 45, 60, 90)
# Convertir des degrés en radians
angle_rad <- angle_deg * pi / 180
# Calculer la valeur du sinus
print("valeur du sinus :")
print(round(sin(angle_rad), 4))
# Calculer la valeur du cosinus
print("valeur de cos :")
print(round(cos(angle_rad), 4))
# Calculer la valeur de la tangente
print("valeur de tan (noter l'infini à 90 degrés) :")
print(round(tan(angle_rad), 4))
angle_deg <- c(0, 30, 45, 60, 90)
# Convertir des degrés en radians
angle_rad <- angle_deg * pi / 180
# Calculer la valeur du sinus
print("valeur du sinus :")
print(round(sin(angle_rad), 4))
# Calculer la valeur du cosinus
print("valeur de cos :")
print(round(cos(angle_rad), 4))
# Calculer la valeur de la tangente
print("valeur de tan (noter l'infini à 90 degrés) :")
print(round(tan(angle_rad), 4))
L'exécution du code ci-dessus produit le résultat suivant :
[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
La fonction arctangente atan2() peut être utilisée pour calculer l'angle polaire d'un point (x, y) dans un plan :
Exemple
# Calculer l'angle polaire du point (1,1) (devrait être 45 degrés)
angle_rad <- atan2(1, 1)
angle_deg <- angle_rad * 180 / pi
print(paste("Angle du point (1,1) :", angle_deg, "degrés"))
# Calculer l'angle polaire du point (-1, 1) (devrait être 135 degrés)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("Angle du point (-1,1) :", angle_deg, "degrés"))
angle_rad <- atan2(1, 1)
angle_deg <- angle_rad * 180 / pi
print(paste("Angle du point (1,1) :", angle_deg, "degrés"))
# Calculer l'angle polaire du point (-1, 1) (devrait être 135 degrés)
angle_rad <- atan2(1, -1)
angle_deg <- angle_rad * 180 / pi
print(paste("Angle du point (-1,1) :", angle_deg, "degrés"))
L'exécution du code ci-dessus produit le résultat suivant :
[1] "点(1,1)的角度: 45 度" [1] "点(-1,1)的角度: 135 度"Autres extensions