[過去ログ]
高校数学の質問スレ Part434 (1002レス)
高校数学の質問スレ Part434 http://rio2016.5ch.net/test/read.cgi/math/1712376048/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
838: 132人目の素数さん [sage] 2024/05/04(土) 19:18:50.52 ID:RS+aZjjf >>829 Rでの数値解 > f=\(th){ + A=0i + B=2+0i + C=1+1i*sqrt(3) + P=cos(th)+1i*sin(th) + abs(B-P)*abs(C-P) + } > curve(f,0,pi/3) > optimize(f,c(0,pi/3)) $minimum [1] 0.5235988 $objective [1] 1.535898 > f(0) [1] 1.732051 > f(pi/3) [1] 1.732051 Wolfram言語での厳密解 Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit) Copyright 1988-2023 Wolfram Research, Inc. In[1]:= f[x_] := EuclideanDistance[{2,0},{Cos[x],Sin[x]}]*EuclideanDistance[{1,Sqrt[3]},{Cos[x],Sin[x]}] In[2]:= In[2]:= Minimize[{EuclideanDistance[{2,0},{Cos[x],Sin[x]}]*EuclideanDistance[{1,Sqrt[3]},{Cos[x],Sin[x]}],0<=x && x<=Pi/3},x] Pi Out[2]= {5 - 2 Sqrt[3], {x -> --}} 6 In[3]:= Maximize[{EuclideanDistance[{2,0},{Cos[x],Sin[x]}]*EuclideanDistance[{1,Sqrt[3]},{Cos[x],Sin[x]}],0<=x && x<=Pi/3},x] Out[3]= {Sqrt[3], {x -> 0} http://rio2016.5ch.net/test/read.cgi/math/1712376048/838
839: 132人目の素数さん [sage] 2024/05/04(土) 20:11:47.28 ID:Yc1P4ABJ >>838 誘導 【R言語】統計解析フリーソフトR 第7章【GNU R】 https://rio2016.5ch.net/test/read.cgi/math/1658084535/ WolframAlphaを使いこなしてる人ってカッコイイ..... https://rio2016.5ch.net/test/read.cgi/math/1623024247/ http://rio2016.5ch.net/test/read.cgi/math/1712376048/839
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.175s*