Data commit

Task/Motzkin-numbers/Sidef/motzkin-numbers-1.sidef

@@ -0,0 +1 @@
+say 50.of { .motzkin }

Task/Motzkin-numbers/Sidef/motzkin-numbers-2.sidef

@@ -0,0 +1,11 @@
+func motzkin_triangle(num, callback) {
+    var row = []
+    { |n|
+        row = [0, 1, {|i| row[i+2] + row[i] + row[i+1] }.map(0 .. n-3)..., 0]
+        callback(row.grep{ .> 0 })
+    } << 2..(num+1)
+}
+
+motzkin_triangle(10, {|row|
+    row.map { "%4s" % _ }.join(' ').say
+})

Task/Motzkin-numbers/Sidef/motzkin-numbers-3.sidef

@@ -0,0 +1,15 @@
+func motzkin_numbers(N) {
+
+    var (a, b, n) = (0, 1, 1)
+
+    N.of {
+        var M = b//n        #/
+        n += 1
+        (a, b) = (b, (3*(n-1)*n*a + (2*n - 1)*n*b) // ((n+1)*(n-1)))        #/
+        M
+    }
+}
+
+motzkin_numbers(42).each_kv {|k,v|
+    say "#{'%2d' % k}: #{v}#{v.is_prime ? ' prime' : ''}"
+}