🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.sci.math
Article #14042

Re: [Q]dot pattern???

#14042
From: Yuzuru Hiraga
Date: Mon, 25 Dec 1995 00:00
94 lines
4732 bytes
$BJ?2l!w?^=q4[>pJsBg3X$G$9!#(J

In article <NAKAWTSE.95Dec23131551@lecoeur.dq.isl.ntt.jp> nakawtse@lecoeur.dq.isl.ntt.jp (S. nakawtse) writes:
>     $B0J2<$N$h$&$J7W;;$GE@$r%W%m%C%H$7$^$7$?!%(J
>   $B!!(Jfor i=1 to 100 {
>       for 100 times{
>	 n1= 0 $B$+$i(Ji$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
>	 n2= 0 $B$+$i(Ji$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
>	 plot(n1/i,n2/i);
>       }
>     }
>---------
>$B!!!!$A$g$C$HD{@5$G$9!%(J
>       for 5000($B$/$i$$(J) times{
>$B!!!!!!(J	 i = 10 $B$+$i(J70$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
>	 n1= 0 $B$+$i(Ji$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
>	 n2= 0 $B$+$i(Ji$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
>	 plot(n1/i,n2/i);
>       }
>
>   $B!!$9$k$H%i%s%@%`$JE@$H$$$/$D$+$ND>@~$,$=$NCf$K(J
>   $B!!$_$($k$N$G$9$,!$$I$&$7$F$J$N$G$7$g$&!)!)(J
	...
>     rand() $B$O(J
>     2**32 $B<~4|$N>hK!9gF1$K4p$E$/Mp?t%8%'%M%l!<%?$r;H(J
>     $BMQ$7$F!"(J0 $B$+$i(J (2**31)-1 $B$^$G$NO"B3$7$?5?;wMp?t$rJV$9!#(J
>$B!!!!$i$7$$$N$G$9$,!$$=$l$J$i$=$l$G!$$3$N$h$&$J$3$H$N5/$3$k(J
>$B!!!!$b$C$H$b$J@bL@$,$G$-$k$N$G$7$g$&$+!)(J

$B$3$l$KBP$7!"(J
In article <4be0an$spe@Faramir.isl.rdc.toshiba.co.jp>
emi@isl.rdc.toshiba.co.jp (Emi T.) writes:
>$BMp?t$K0lMM@-$,7g$1$F$$$k$+$i$G$9!#(J

$B;DG0$J$,$i!"Mp?t%8%'%M%l!<%?$NNIH]$OD>@\E*$J860x$G$O$"$j$^$;$s$M!#(J
$B!J4V@\E*!&I{<!E*$K$O1F6A$7$^$9$,!K(J
$B$?$@$3$NE@$K$D$$$F!">pJsITB-$G$O$"$j$^$9!#(J

$B$?$H$($P>e$G(J
>	 n1= 0 $B$+$i(Ji$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J
$B$H$$$&5-=R$,$"$j$^$9$,!"$3$l$O$I$&$d$C$?$N$G$7$g$&!)(J

$B$4$/4JC1$K9M$($F$b(J r = rand() (0 <= r < MAXRAND) $B$H$7$F!'(J
  * r % (i+1) $B$r$H$k!J(Jmod $B1i;;!K!#(J
  * [0,MAXRAND) $B$r(J (i+1) $BEyJ,$7$F!"(Jr $B$,$=$N2?HVL\$N6h2h$KF~$k$+$G(J
  $B!!>l9gJ,$1$9$k!#(J
$B$J$I$J$I!"$$$m$$$m$J$d$jJ}$,$"$j$^$9!#(J
$B:G=i$N$b$N$NJ}$,Bg$-$JLdBj$,$"$C$F!"0lHL$KMp?t%8%'%M%l!<%?$O(J
mod $B1i;;$K$O$"$^$jAj@-$,$h$/$"$j$^$;$s!#(J
$B>e$N0zMQ$K$"$k@bL@$O(J UNIX $B$N(J man $B$N$b$N$H;W$$$^$9$,!"(J
$BF1$8Cf$K<!$N$h$&$J5-=R$,$"$j$^$9!#(J

>$BCm0U;v9`(J
>     rand() $B$NJ,I[FC@-$K$O!"$+$J$j$NLdBj(J $BE@(J $B$,(J $B;D$C(J $B$F(J $B$$(J $B$^(J $B$9!#(J
>     drand48(3) $B$*$h$S(J random(3) $B$NJ}$,J#;($G$9$,!"Mp?t%8%'%M%l!<(J
>     $B%?$H$7$F$O(J rand() $B$h$jM%$l$F$$$^$9!#(J
>$B;HMQ>e$NN10UE@(J
>     $B@8@.$5$l$??t$N2<0L%S%C%H$O!"$"$^$j%i%s%@%`$G$O$J$$$N$G!"Cf0L(J
>     $B%S%C(J $B%H(J $B$r;HMQ$7$F$/$@$5$$!#$H$j$o$1!":G2<0L%S%C%H$O!"(J0 $B$H(J 1
>     $B$,8r8_$K8=$l$^$9!#(J

=====

$B$=$3$GK\Bj$G$9$,!">e$NH/@8J}<0!J$I$A$i$G$bBg:9$"$j$^$;$s!K$,(J
[0,1]x[0,1] $B>e$G$I$NDxEY0lMM$JE@$rH/@8$5$;$k$+$r9M$($F$/$@$5$$!#(J
$B7kO@$+$i8@$($P!"H/@8$9$kE@(J (x,y) $B$O$+$J$j8BDj$r<u$1$F$*$j!"(J
$BD>@~$,8+$($k$N$OI,A3E*7k2L$G$9!#(J

$B>e$G$O(J (x,y) $B$H$b!"F1$8J,Jl$r$b$DM-M}E@$G$"$j!"$7$+$bJ,Jl<+BN!"(J
$B>.$5$JCM$NHO0O$K8BDj$5$l$F$^$9!J:G=i$N$G(J 1..100, $B#2HVL\$G(J 10..70$B!K!#(J
$B$7$?$,$C$F4JC1$JHf$GI=$;$kD>@~$K>h$kE@$,B??tH/@8$7$^$9!#(J
$B$?$H$($P(J y=x/2 $B$KBP$7$F!'(J
	1/2 = 2/4= 3/6 = ... = 35/70 = ... 
$B$J$I$J$I!J<B:]$N(J (x,y) $B$KBP1~$5$;$k$K$OJ,Jl;R$r(J i $B$G3d$j$^$9!K!#(J
$B8=$l$F$$$kD>@~$O(J y=1, x=1, x=1/2, y=x, y=1-x, y=x/2, ... $B$J$I$N(J
$BJ}Dx<0$GI=$;$k$O$:$G$9!#(J

$B$^$?4Q;!$7$F$$$?$@$1$P!"8=$l$F$$$kD>@~$N6a$/$O6uGr$G$"$k!"(J
$B$7$?$,$C$FD>@~$,!VIb$->e$,$C$F!W8+$($k$O$:$G$9!#(J
$B$3$l$OJ,Jl!J(Ji$B!K$,>.$5$$$?$a!"D>@~>e$NE@$r4^$`3FM-M}E@$N==J,6a$/$K(J
$B$=$l$H0[$J$kM-M}E@$,B8:_$7$J$$$?$a$G$9!#(J

$B>\$7$$J,@O$r$9$k$N$O$o$:$i$o$7$$$N$G!"(J
$B>e$N#2HVL\$NJ}K!$G!'(J
>$B!!!!!!(J	 i = 10 $B$+$i(J70$B$^$G$+$i%i%s%@%`$K#1$D!%!J<B:]$O(Jrand$B!K(J

$B$N$H$3$m$r$?$H$($P!V(Ji=200 $B$+$i(J 300$B!W$K$7$F!"(J
$B$=$l$G$b$J$*D>@~$,8=$l$k$+$I$&$+$rD4$Y$F$/$@$5$$!#(J

# $B<B$O0l1~$d$C$F$_$^$7$?!#(J
# i=200..300 $B$0$i$$$K$9$k$H!"8+$?L\D>@~$O>C$($F%i%s%@%`%Q%?!<%s$K8+$($^$9!#(J
# $B$^$?Mp?t%8%'%M%l!<%?$d(J (i,n1,n2) $B$N:n$jJ}$O$"$^$j1F6A$7$^$;$s!#(J

$B!JJ?2l!w?^=q4[>pJsBg3X!K(J
Technical Details
Message-ID: <DK4IKC.2IL@ulis.ac.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <NAKAWTSE.95Dec22151644@lecoeur.dq.isl.ntt.jp> <NAKAWTSE.95Dec23131551@lecoeur.dq.isl.ntt.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: f4956,10671be6f93c219a
X-Google-Attributes: gidf4956,public
From: hiraga@ulis.ac.jp (Yuzuru Hiraga)
Subject: Re: [Q]dot pattern???
Date: 1995/12/25
Message-ID: <DK4IKC.2IL@ulis.ac.jp>
X-Deja-AN: 122757434
distribution: fj
sender: news@ulis.ac.jp (bach Usenet News System)
references: <NAKAWTSE.95Dec22151644@lecoeur.dq.isl.ntt.jp> <NAKAWTSE.95Dec23131551@lecoeur.dq.isl.ntt.jp>
organization: Univ. of Lib. & Info. Sci., Tsukuba Japan 
newsgroups: fj.sci.math