底辺私立医大を卒業した医者って頭悪いよね? Part27at HOSP底辺私立医大を卒業した医者って頭悪いよね? Part27 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト300:卵の名無しさん (スッププ Sd72-8HUq [49.105.74.83]) 23/02/02 17:41:14.90 WDWUl2yId.net >>299 という、妄想を書き続ける哀れな尿瓶ジジイ 301:卵の名無しさん (アウアウウー Saa3-mHun [106.128.73.88]) 23/02/02 20:25:33.44 b+7F+XFsa.net >>299 おい尿瓶ジジイ さっさと質問に答えろ 302:卵の名無しさん (ワッチョイ 7758-vH9C [14.13.16.0]) 23/02/03 02:59:02.55 oh7Rg45R0.net >>294 麻酔で使うわけないじゃん、アホかよ? Rの利用法を書いただけ。 文脈が読めないとは入試に国語ないシリツだろう? 303:卵の名無しさん (ワッチョイ 7758-vH9C [14.13.16.0]) 23/02/03 03:00:25.74 oh7Rg45R0.net >>295 裏口シリツを否定しないとは真性裏口ってことでいいな。 んで、あんたどこ卒? 304:卵の名無しさん (ワッチョイ 7758-vH9C [14.13.16.0]) 23/02/03 03:03:04.88 oh7Rg45R0.net Rでこんなこともできます。 # 三点の座標から外接円の中心と半径を返す Outcircle <- function(A,B,C){ # circumscribing circle a1=Re(A) ; a2=Im(A) b1=Re(B) ; b2=Im(B) c1=Re(C) ; c2=Im(C) o1 = (a1^2*(b2-c2) + a2^2*(b2-c2) + a2*(-b1^2-b2^2+c1^2+c2^2)+ b1^2*c2+b2^2*c2-b2*c1^2-b2*c2^2)/(2*(a1*(b2-c2)+a2*(c1-b1)+b1*c2-b2*c1)) o2 = (a1^2*(c1-b1)+a1*(b1^2+b2^2-c1^2-c2^2)+a2^2*(c1-b1)-b1^2*c1+b1*c1^2+b1*c2^2- b2^2*c1)/(2*(a1*(b2-c2)+ a2*(c1-b1)+ b1*c2- b2*c1)) center=o1+1i*o2 radius=abs(center-A) c(center=center,radius=radius) } 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch