プログラミングの為の数学と算数 vol.2

プログラミングの為の数学と算数 vol.2at TECH

プログラミングの為の数学と算数 vol.2 - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

908:デフォルトの名無しさん
 07/06/07 16:06:19 
電卓で計算させたら、 
やっぱりポアソン分布の方がオーバフローし易いみたいだな。 
 
n個中k個の確率は2項分布なら 
n!/(k! * (n-k)!)*p^k*(1-p)^(n-k) で、階乗をそのまま計算したらオーバフローするから 
kの大きい所まで計算する必要はないから、 for 文で計算すればオーバーフローしないんじゃないかな 
 
と無責任に言ってみる

909:デフォルトの名無しさん
 07/06/07 17:26:18 
>>905 
いつ買っても損をする。 
なぜなら賭博とはそういうふうに出来ているから。 
 
totoがダメだったのは、賞金頭割りだから順当な結果の回は１等数千円とかザラ、荒れるとビックリするほど当らない。 
BIGはどうなるかわからんけど、totoで客離れちゃったからキャリー期待するのは難しいんじゃないかなぁ。 
計算すんのは楽しいけどねｗ

910:905
 07/06/07 18:38:35 
>>908 
ありがとう。その式で計算させました。　JavaScriptですが 
function combination(n, k) 
{ 
 var i,c=1; 
 for(i=1;i<=k;i++){ c=c*(n+1-i)/i;} 
 return c; 
} 
function P(n,k) 
{ 
var p0=1.0/Math.pow(3, 14); 
if(k==0) return  Math.pow( 1-p0 ,n );  
return combination(n, k) *  Math.pow(p0,k) * Math.pow( 1-p0 ,n-k );  
 
} 
 
function kangen(CY , X) 
{  
var i; 
 var gensi=X*300*0.4+CY; 
 var umax=6E8; 
  if(CY==0) umax=3E8;//キャリーが無い時は上限3億円 
 var sum=0; 
 for(i=1;i<20;i++) { //iが１当の数 
  var a=Math.min(gensi/i,umax); //1等の配当は原資を当選数で割った金と上限の小さい方 
   p=P(X,i); 
   sum +=  i*a*p;//当選金総額x確率を掛算 
   if(p<1E-6)break;//計算誤差が6桁以下になれば終わり 
 } 
  return 30+sum/X; 
}

次ページ