[過去ログ]
高校数学の質問スレ Part436 (1002レス)
高校数学の質問スレ Part436 http://rio2016.5ch.net/test/read.cgi/math/1718662026/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
370: 132人目の素数さん [sage] 2024/06/29(土) 07:54:09.62 ID:jRWngvgb >>369 WolframのFindMaximum関数は正しい値を返してこないな。 In[6]:= Vx /@ {6.708204,7.615773} Out[6]= {11.9765, 11.9765} In[7]:= In[7]:= FindMaximum[{Vx[x], 6 <= x <= 7},{x,6}] Out[7]= {11.9765, {x -> 6.7082}} In[8]:= FindMaximum[{Vx[x], 7 <= x <= 8},{x,7}] Out[8]= {11.9021, {x -> 7.}} http://rio2016.5ch.net/test/read.cgi/math/1718662026/370
371: 132人目の素数さん [sage] 2024/06/29(土) 08:40:08.42 ID:jRWngvgb >>370 R言語で6,7を初期値としてNelder-Meadで探索させた結果。 unreliableの警告を出しながら近似数値を返してきている。 > optim(6, Vx, control=list(fnscale=-1))$par [1] 6.708398 Warning message: In optim(6, Vx, control = list(fnscale = -1)) : one-dimensional optimization by Nelder-Mead is unreliable: use "Brent" or optimize() directly > optim(7, Vx, control=list(fnscale=-1,warn.1d.NelderMead = FALSE))$par [1] 7.615918 Brent, R. (1973) Algorithms for Minimization without Derivatives. Englewood Cliffs N.J.: Prentice-Hall. に依拠したoptimise関数で算出 > optimise(Vx,c(6,7), maximum = TRUE, tol=1e-16)$maximum [1] 6.708204 > optimise(Vx,c(7,8), maximum = TRUE, tol=1e-16)$maximum [1] 7.615773 http://rio2016.5ch.net/test/read.cgi/math/1718662026/371
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.036s