dwww Home | Show directory contents | Find package

#
# create random data, used e.g. by 
# random.dem, ellipse.dem, rugplot.dem, and kdensity2d.dem
#
if (!exist("$random")) {
    load "stat.inc"
    nsamp = 3000
    # Generate N random data points.
    set print $random
    do for [i=1:nsamp] {
        print sprintf("%8.5g %8.5g %8.5g", invnorm(rand(0)), invnorm(rand(0)), invnorm(rand(0)))
    }
    unset print
}

Generated by dwww version 1.15 on Mon Jun 24 14:05:29 CEST 2024.