[過去ﾛｸﾞ] 高校数学の質問スレ Part434 (1002ﾚｽ)

高校数学の質問スレ Part434 http://rio2016.5ch.net/test/read.cgi/math/1712376048/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

475: １３２人目の素数さん [sage] 2024/04/24(水) 08:49:33.24 ID:AHiYNm6q >>474 直感的にはそう思うよね。 線分だけなら無理だけど長方形の辺なら中点がだせるから 正三角形（あるいは正多角形）でも可能だろうか？ http://rio2016.5ch.net/test/read.cgi/math/1712376048/475

482: １３２人目の素数さん [sage] 2024/04/24(水) 11:30:55.44 ID:AHiYNm6q >>480 Rの方は動作しているんだが、動かしてから言ってる？ Rのコードはx,y軸に平行な場合もreturn命令で正しい値を返して来るよ。 Wolframだと軸に平行な場合は０除算を含む式まで評価しようとするので エラーを返してくる。 http://rio2016.5ch.net/test/read.cgi/math/1712376048/482

484: １３２人目の素数さん [sage] 2024/04/24(水) 11:40:49.27 ID:AHiYNm6q Rの場合は関数定義内に可読性をよくするために空白行をおけるけど、 Wolfram言語だとそれは許されない。 これに気づいてデバッグするのに時間がかかった。 ; だけなら関数定義内と認識してくれる。 んで、 複素平面上で点a,bを結ぶ直線と点c,dを結ぶ直線の交点の座標を計算する関数を作れ。 の例 intsect[a_,b_,c_,d_] :=( a1=Re[a] ; a2=Im[a]; b1=Re[b] ; b2=Im[b]; c1=Re[c] ; c2=Im[c]; d1=Re[d] ; d2=Im[d]; ; mxn11=Det[{{a1,a2},{b1,b2}}]; mxn12=a1-b1; mxn21=Det[{{c1,c2},{d1,d2}}]; mxn22=c1-d1; mxn=Det[{{mxn11,mxn12},{mxn21,mxn22}}]; mxd=Det[{{a1-b1,a2-b2},{c1-d1,c2-d2}}]; x=mxn/mxd; ; myn11=mxn11; myn12=a2-b2; myn21=nxn21; myn22=c2-c2; myn=Det[{{myn11,myn12},{myn12,myn22}}]; myd=mxd; y=myn/myd; ; x+y*I ) intsect[0I,1+0I,0+1I,1+1I] intsect[0I,2+0I,1+1I,1+2I] intsect[0I,2I,-1+1I,1+1I] intsect[0I,2+0I,-1+1I,1+2I] intsect[0,1+2I,3+4I,5+6I] の結果はRの出力と合致。 分数や累乗根表示してくれるからWolframだと厳密解がだせていいのだが、 無料のWolframScriptはテキストベースなので作図は慣れたRでやっている。 http://rio2016.5ch.net/test/read.cgi/math/1712376048/484

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.029s