Article View: fj.sci.math
Article #14312Help Mathematica
From: Nagatomo Nakamura
Date: Mon, 30 Nov 1992 05:44
Date: Mon, 30 Nov 1992 05:44
24 lines
1236 bytes
1236 bytes
$B$O$8$a$^$7$F!"CfB<!wAm9g8&5fBg3X1!Bg3X!JE}7W?tM}8&5f=j!K$H?=$7$^$9!#(J
Mathematica $B$K$D$$$F<ALd$,$"$j$^$9!#(J
$B<!$N$h$&$JA`:n$r$7$F(Jv$B$N2r$,F@$i$l$^$7$?!#(J
In[1]:= L[n_,q_,w_]:=n v/2 - n Log[Gamma[v/2]] + (v/2 -1) q - v/2 w;
In[2]:= FindMinimum[- L[60,-0.02981080697,59.97062915],{v,2}]
Out[2]= {-7.31835, {v -> 2.92325}}
$B$A$J$_$K(J Out[2] $B$N0UL#$O!"(Jv=2.92325 $B$N$H$-:G>.CM(J -7.31835 $B$G$9!#(J
$B$3$N2r$r$"$kJQ?t$KBeF~$7$?$$$N$G$9!#(J
$B$I$N$h$&$K$7$?$iNI$$$N$G$7$g$&$+!#$I$J$?$+65$($F2<$5$$!#(J
1992$BG/(J11$B7n(J30$BF|!J7n!K(J
-------------
nagatomo@ism.ac.jp
$BCfB<1JM'!wAm8&Bg!JE}?t8&!K(J
Technical Details
Message-ID:
<1992Nov30.054417.25400@ismspc6.ism.ac.jp>Path:
arc1-ca.pugleaf.net!sparky!uunet!ccut!s.u-tokyo!ismspc6!nagatomoShow Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: f4956,94c9b6ee77445a98,start X-Google-Attributes: gidf4956,public X-Google-ArrivalTime: 1992-11-29 21:48:41 PST Newsgroups: fj.sci.math Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!s.u-tokyo!ismspc6!nagatomo From: nagatomo@sundc1.ism.ac.jp (Nagatomo Nakamura) Subject: Help Mathematica Date: Mon, 30 Nov 1992 05:44:17 GMT Nntp-Posting-Host: sundc1 Distribution: fj Organization: The Inst. of Statistical Mathematics, Tokyo Japan Sender: news@ism.ac.jp Message-ID: <1992Nov30.054417.25400@ismspc6.ism.ac.jp> Lines: 24