🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.sci.math
Article #14328

Re: Help mathematica part 2

#14328
From: Yuichi Pop Kimura
Date: Wed, 02 Dec 1992 03:07
24 lines
1872 bytes
$BF|K\Bg3X@8;:9)3XIt$NLZB<$H$b$&$7$^$9!#(J

  In article <1992Nov30.084038.17202@ismspc6.ism.ac.jp> nagatomo@sundc1.ism.ac.jp (Nagatomo Nakamura) writes:
 $B!U(J> Mathematica $B$K$D$$$F<ALd$,$"$j$^$9!#(J
 $B!U(J> $B<!$N$h$&$JA`:n$r$7$F(Jv$B$N2r$,F@$i$l$^$7$?!#(J
 $B!U(J>
 $B!U(J>In[1]:=  L[n_,q_,w_]:=n v/2 - n Log[Gamma[v/2]] + (v/2 -1) q - v/2 w;
 $B!U(J>In[2]:= FindMinimum[- L[60,-0.02981080697,59.97062915],{v,2}]
 $B!U(J>Out[2]= {-7.31835, {v -> 2.92325}}
 $B!U$H$J$j$^$9!#(J $B$3$3$G;d$,M_$7$$$N$O!"$3$N7A<0$G$O$J$/(J
 $B!U(J	var=2.92325
 $B!U$H$$$&CM$b$7$/$O(J
 $B!U(J	var={2.92325}
 $B!U$N%j%9%H7A<0$G$9!#(J
In[10]:=%2//TreeForm
Out[10]//TreeForm= List[-7.31835, |                     ]
                                  List[|               ]
                                       Rule[v, 2.92325]
$B$H$J$j$^$9$N$G!"(J ( %2[[2]][[1]] )[[2]]$B$,(J``2.92325''$B$H$J$j$^$9!#(J

-- 
Yuichi Kimura,Ph.D: Dep.of Industrial Eng. & Management, Col.of Industrial
Technology, Nihon univ., 1-2-1, Izumi, Narashino, Chiba, 275, Japan
TEL:0474(74)2637	FAX:0474(74)2619	CALL SIGN : JN1LXJ
Technical Details
Message-ID: <1992Dec2.030720.1669@citsvr1.cit.nihon-u.ac.jp>
Path: arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!kuis!s.u-tokyo!kekux!crimson!ume!gama!lab!nttdpe!citnugw!citsvr1!juno!kimura
References: <1992Nov30.084038.17202@ismspc6.ism.ac.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: f4956,7131144f87af4c34
X-Google-Attributes: gidf4956,public
X-Google-ArrivalTime: 1992-12-02 07:04:36 PST
Path: arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!kuis!s.u-tokyo!kekux!crimson!ume!gama!lab!nttdpe!citnugw!citsvr1!juno!kimura
From: kimura@ka.cit.nihon-u.ac.jp (Yuichi Pop Kimura)
Newsgroups: fj.sci.math
Subject: Re: Help mathematica part 2
Message-ID: <1992Dec2.030720.1669@citsvr1.cit.nihon-u.ac.jp>
Date: 2 Dec 92 03:07:20 GMT
References: <1992Nov30.084038.17202@ismspc6.ism.ac.jp>
Sender: news@citsvr1.cit.nihon-u.ac.jp
Reply-To: kimura@ka.cit.nihon-u.ac.jp
Distribution: fj
Organization: Col.of. Industrial Tech., Nihon univ.
Lines: 24