aboutsummaryrefslogtreecommitdiffstats
path: root/buch/chapters/060-integral/images/erfpunkte.m
diff options
context:
space:
mode:
Diffstat (limited to 'buch/chapters/060-integral/images/erfpunkte.m')
-rw-r--r--buch/chapters/060-integral/images/erfpunkte.m16
1 files changed, 16 insertions, 0 deletions
diff --git a/buch/chapters/060-integral/images/erfpunkte.m b/buch/chapters/060-integral/images/erfpunkte.m
new file mode 100644
index 0000000..ae4ada1
--- /dev/null
+++ b/buch/chapters/060-integral/images/erfpunkte.m
@@ -0,0 +1,16 @@
+#
+# erf.m provide plot data for error function
+#
+# (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+#
+N = 93;
+x = (-N:N) / 30;
+y = erf(x);
+
+fn = fopen("erfpunkte.tex", "w");
+fprintf(fn, "\\def\\erfpfad{(%.3f,%.3f)", x(1), y(1));
+for i = (2:(2*N+1))
+ fprintf(fn, "\n -- (%.3f,%.3f)", x(i), y(i));
+endfor
+fprintf(fn, "}\n");
+fclose(fn)