メイン　sample-size4.html　　　Last modified: Sep 01, 2009
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;CHARSET=EUC-JP">
<link rel="shortcut icon" href="../favicon.ico">
<title>JavaScript</title>
<script src="pxg.js">document.write("pxg.js ファイルが見つかりません??<br>")</script>

<script language="JavaScript">
<!--

function pxg2(x)
{

  return (x > 0.5) ? -pxg(1-x) : pxg(x)
}

function fisherz(r1)
{
  return 0.5*Math.log((1+r1)/(1-r1))
}

function f_corr1(form)
{
  form.n.value = form.n2.value = ""
  var r1, alpha, beta
  if (isNaN(r1 = parseFloat(form.r1.value)) || r1 <= -1 || r1 >= 1 || isNaN(alpha = parseFloat(form.alpha.value)) || alpha <= 0 || alpha >= 1 || isNaN(beta = parseFloat(form.beta.value)) || beta <= 0 || beta >= 1) return
  c = fisherz(r1)
  form.n.value = Math.ceil(Math.pow( (pxg2(alpha)+pxg2(1-beta)) / fisherz(r1), 2)+3)
  form.n2.value =  Math.ceil(Math.pow( (pxg2(alpha/2)+pxg2(1-beta)) / fisherz(r1), 2)+3)
}

function f_corr2(form)
{
  form.n.value = form.n2.value = ""
  var r1, r2, alpha, beta
  if (isNaN(r1 = parseFloat(form.r1.value)) || r1 <= -1 || r1 >= 1 || isNaN(r2 = parseFloat(form.r2.value)) || r2 <= -1 || r2 >= 1 || isNaN(alpha = parseFloat(form.alpha.value)) || alpha <= 0 || alpha >= 1 || isNaN(beta = parseFloat(form.beta.value)) || beta <= 0 || beta >= 1) return
  form.n.value = Math.ceil(Math.pow( (pxg2(alpha)+pxg2(1-beta)) / (fisherz(r1)-fisherz(r2)), 2)+3)
  form.n2.value =  Math.ceil(Math.pow( (pxg2(alpha/2)+pxg2(1-beta)) / (fisherz(r1)-fisherz(r2)), 2)+3)
}

//-->
</script>
</head>

<body bgcolor="#ffffff">
<font size="+2"><b>母相関係数の検定に必要な標本サイズの決定</b></font><br>　<a  href="src/sample-size4.html"><img src="png/src.png" width=35 height=11 alt="src" align=top></a>　　　　　Last modified: Jun 01, 2006<hr noshade><p>
<font color="#ff0000" size="+2">以下のプログラムのサポートは終了しました。自己責任でお使い下さい。</font>

<script language="JavaScript">
<!--
//-->JavaScript がサポートされていないブラウザですか？
</script>
<hr noshade>
<table border=1>
<tr>
  <td valign=top align=right bgcolor="#eecccc">
    <table border=0>
    <caption><font color="#5555aa"><b>母相関係数の検定</b></font></caption>
    <tr>
    <td align=right>
      <form name="corr1">
      母相関係数の概数 <input name="r1" value=0.3 size=10><br>
      有意水準 <input name="alpha" value=0.05 size=10><br>
      検出力 <input name="beta" value=0.8 size=10><br>
      <input type="button" name="clear" value="初期化" onClick="this.form.r1.value=this.form.alpha.value=this.form.beta.value=this.form.n.value=this.form.n2.value=''">　<input type="button" name="calcurate" value="計算開始" onClick="f_corr1(this.form)"><br>
      片側検定標本サイズ <input name="n" value="" size=10><br>
      両側検定標本サイズ <input name="n2" value="" size=10><p>
      <img src="../gra/button3.png" width=9 height=9 alt="・"> <A HREF="../lecture/SampleSize/corr1.html"> 手法の解説</a><br>
      </form>
    </td>
    </tr>
    </table>
  </td>

  <td valign=top align=right bgcolor="#eecccc">
    <table border=0>
    <caption><font color="#5555aa"><b>母相関係数の差の検定</b></font></caption>
    <tr>
    <td align=right>
      <form name="corr2">
      母相関係数 1 の概数 <input name="r1" value=0.3 size=10><br>
      母相関係数 2 の概数 <input name="r2" value=0.4 size=10><br>
      有意水準 <input name="alpha" value=0.05 size=10><br>
      検出力 <input name="beta" value=0.8 size=10><br>
      <input type="button" name="clear" value="初期化" onClick="this.form.r1.value=this.form.r2.value=this.form.alpha.value=this.form.beta.value=this.form.n.value=this.form.n2.value=''">　<input type="button" name="calcurate" value="計算開始" onClick="f_corr2(this.form)"><br>
      片側検定標本サイズ <input name="n" value="" size=10><br>
      両側検定標本サイズ <input name="n2" value="" size=10><p>
      <img src="../gra/button3.png" width=9 height=9 alt="・"> <A HREF="../lecture/SampleSize/corr2.html"> 手法の解説</a><br>
      </form>
    </td>
    </tr>
    </table>
  </td>
</tr>
</table>
<p><hr noshade>
<img src="../gra/button3.png" width=9 height=9 alt="・"> <A HREF="javascript:history.go(-1)">直前のページへ戻る</A>　　<img src="../gra/button3.png" width=9 height=9 alt="・"> <a href="../mail.html">E-mail to Shigenobu AOKI</a>
<p><center><IMG SRC="../gra/ume5.png" width=121 height=37 ALT="Made with Macintosh"></center>
</body>
</html>

サブ　pxg.js　　　Last modified: Mar 25, 2004
・ 直前のページへ戻る　　・ E-mail to Shigenobu AOKI

Made with Macintosh