Van Eck sequence: Difference between revisions

Content added Content deleted
(Add ABC)
(Added Uiua solution)
Line 3,705: Line 3,705:
vanEck(0..9) = 0 0 1 0 2 0 2 2 1 6
vanEck(0..9) = 0 0 1 0 2 0 2 2 1 6
vanEck(990..999) = 4 7 30 25 67 225 488 0 10 136
vanEck(990..999) = 4 7 30 25 67 225 488 0 10 136

=={{header|Uiua}}==
<syntaxhighlight lang="Uiua">
# Generator function (prepends).
F ← ⊂⟨0◌|+1⟩>⊙(-1⧻),,⊗⊃⊢(↘1).
# Generate 1000 terms and flip.
⇌⍥(F)999 [0]
# Print first and last 10 terms.
⊃(&p↙¯10)(&p↙10)
</syntaxhighlight>
{{out}}
<pre>
[0 0 1 0 2 0 2 2 1 6]
[4 7 30 25 67 225 488 0 10 136]
</pre>


=={{header|Visual Basic .NET}}==
=={{header|Visual Basic .NET}}==