高校数学の質問スレ（医者・東大卒専用） Part438 (979ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

466: １３２人目の素数さん [sage] 2024/12/22(日) 21:03:18.86 ID:rWRciXK9 spherical_triangle_area <- function(R, a, b, c) { # 直交座標への変換 to_cartesian <- function(lat, lon) { c(cos(lat) * cos(lon), cos(lat) * sin(lon), sin(lat)) } p <- to_cartesian(a[1], a[2]) q <- to_cartesian(b[1], b[2]) r <- to_cartesian(c[1], c[2]) # 辺のベクトルを計算 u_ab <- q - p u_bc <- r - q u_ca <- p - r # 内角を計算 angle_between <- function(u, v) { acos(sum(u * v) / (sqrt(sum(u^2)) * sqrt(sum(v^2)))) } alpha <- angle_between(u_ab, -u_ca) beta <- angle_between(u_bc, -u_ab) gamma <- angle_between(u_ca, -u_bc) # 超過角を計算 E <- alpha + beta + gamma - pi # 球面三角形の面積を計算 R^2 * E } http://rio2016.5ch.net/test/read.cgi/math/1723152147/466

467: １３２人目の素数さん [sage] 2024/12/22(日) 22:19:23.50 ID:ODwmJOyZ https://i.imgur.com/Q34Vduy.jpeg >>466 http://rio2016.5ch.net/test/read.cgi/math/1723152147/467

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.028s