f02.kg

Download program

.l("config.kg")

X/y set X::(!30),'err(20;20;0.5*!30)) cached here for determinism

X::[[0 2.35] [1 -3.03] [2 1.0] [3 -0.26] [4 6.12] [5 6.03] [6 3.0]
    [7 5.26] [8 11.65] [9 0.97] [10 6.76] [11 6.09] [12 6.59] [13 6.5]
    [14 1.71] [15 9.85] [16 8.0] [17 3.79] [18 8.41] [19 9.5] [20 18.24]
    [21 12.85] [22 13.35] [23 6.79] [24 10.82] [25 12.5] [26 11.24]
    [27 17.03] [28 15.18] [29 19.21]]

Leave some space on the x-axis

settext(16)

Draw a grid; x-axis from -2 to 1+#X, y-axis from -2 to 22, both with step width 2

grid((-2),(1+#X),2;[-6 22 2])

Scatter-plot x/y set X

scplot2(X)
draw()

contact