作者: Bruce.
日時: 2009/2/11(20:55)
Bruce.です。

ちなみに

davi さんは書きました:

> $x = 0.2;
> $y = 0.3;
> for ($i=0;$i<10000;$i++){
>     printf("%1.3g\t%1.3g\n" ,$x,$y);
>     ($x,$y) = (1.0+$y-1.4*$x*$x, 0.3*$x);
> }

printfの書式指定を 7.3fとかにしてやると

  0.200	  0.300
  1.244	  0.060
 -1.107	  0.373
 -0.341	 -0.332
  0.505	 -0.102
  0.540	  0.152
  0.743	  0.162
  0.390	  0.223
  1.010	  0.117
 -0.312	  0.303
以下略


こうなります


> # -----------------------
> 
> う〜む。ちゃんと出た。
> 
> Active Perl v5.8.9 build 825 [288577]
> 0.2 0.3
> 1.24 0.06
> -1.11 0.373
> -0.341 -0.332
> 0.505 -0.102
> 0.54 0.152
> 0.743 0.162
> 0.39 0.223
> 1.01 0.117
> -0.312 0.303
> 
> 式そのものは簡単なので、ついでにExcelで同様の式を作成して
> やってみました。
> x          y
> 0.2         0.3
> =1+B2-1.4*A2^2   =0.3*A2
> 以下、オートフィル。
> 
> 出てきた結果は以下の通り。
> 
> Excel 2007
> x y
> 0.2 0.3
> 1.244 0.06
> -1.107 0.3732
> -0.341 -0.33196512
> 0.505 -0.102310591
> 0.540 0.151562331
> 0.743 0.162108168
> 0.390 0.222833095
> 1.010 0.11691104
> -0.312 0.303065036
> 


-- 
木村浩一/KIMURA Koichi
 I thought what I'd do was, I'd pretend I was one of those deaf-mutes or
shoud I?
 mail kbk at kt.rim.or.jp
 web  www.kt.rim.or.jp/~kbk/zakkicho/index.html