高校数学の質問スレ(医者・東大卒専用) Part438 (991レス)
高校数学の質問スレ(医者・東大卒専用) Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
252: 132人目の素数さん [sage] 2024/10/27(日) 09:42:05.05 ID:HIz5euo6 # 一峰性非対称分布する離散量t1の95% highest probability intervalを返す t2=sort(table(t1),decreasing=TRUE) t3=as.numeric(names(t2)) t4=t2/sum(t2) t5=sum(cumsum(t4)<0.95) range(t3[1:t5]) sum(t2[1:t5]/sum(t2)) range(t3[1:(t5+1)]) sum(t2[1:(t5+1)]/sum(t2)) http://rio2016.5ch.net/test/read.cgi/math/1723152147/252
253: 132人目の素数さん [sage] 2024/10/27(日) 09:51:18.11 ID:HIz5euo6 >>246 例 複素平面上の点A,B,Cの作る三角形の面積を求める関数をプログラムせよ 行列式を使って1行で完成する ABCS <- function(A,B,C) abs(det(rbind(c(Re(A-C),Im(A-C)),c(Re(B-C),Im(B-C)))))/2 http://rio2016.5ch.net/test/read.cgi/math/1723152147/253
254: 132人目の素数さん [sage] 2024/10/27(日) 09:55:54.15 ID:HIz5euo6 数学の知識がプログラム短縮できる例(R言語) 四面体の頂点を与えて四面体の体積を行列式を使って計算 ABCD2V <- function(A,B,C,D){ # 四面体ABCDの体積 v=rbind(A,B,C,D) abs(det(rbind(v[1,]-v[4,],v[2,]-v[4,],v[3,]-v[4,])))/6 } http://rio2016.5ch.net/test/read.cgi/math/1723152147/254
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.042s