RosettaCodeData/Task/Van-Eck-sequence/Uiua/van-eck-sequence.uiua
2024-04-19 16:56:29 -07:00

3 lines
223 B
Text

F ← ⊂⟨0◌|+1⟩>⊙(-1⧻),,⊗⊃⊢(↘1). # Generator function (prepends).
⇌⍥F999 [0] # Generate 1000 terms and flip.
⊃(&p↙¯)(&p↙∘)10 # Print first and last 10 terms.