Annotation of OpenXM_contrib/gnuplot/demo/random.dem, Revision 1.1.1.2
1.1 maekawa 1: #
1.1.1.2 ! maekawa 2: # $Id: random.dem,v 1.1.1.1 1998/04/15 19:16:42 lhecking Exp $
1.1 maekawa 3: #
4: # random.dem
5: #
6: # Lattice test for random numbers;
7: # If you can see any patterns in this plot, the random number generator
8: # is not very good.
9: #
10: # Permission granted to distribute freely for non-commercial purposes only
11: #
12: # Copyright (c) 1991, Jos van der Woude, jvdwoude@hut.nl
13: seed = 1317
14: seed = rand(seed)
15: set nokey
16: set xrange [0: 1]
17: set yrange [0: 1]
18: set zrange [0: 1]
19: set title "Lattice test for random numbers"
20: set xlabel "rand(n) ->"
21: set ylabel "rand(n + 1) ->"
22: set zlabel "rand(n + 2) ->"
23: set format x "%3.2f"
24: set format y "%3.2f"
25: set format z "%3.2f"
26: set tics
27: set sample 1000
28: set function style dots
29: set parametric
30: plot rand(1), rand(1)
31: pause -1 "Hit return to continue"
32: pause 0 "3D plot ahead, one moment please ..."
33: set sample 50
34: splot rand(1), rand(1), rand(1)
35: pause -1 "Hit return to continue"
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>