2 Improved code
source | link

8th, 4242 36 34 bytes

Code

>r [] ' noopa:push 0 rotr> loop dup 1+ a:close a:shuffle

This code leaves array on TOS.SED (Stack Effect Diagram) is n -- a

Usage and example

ok> 5 >r [] ' noopa:push 0 rotr> loop dup 1+ a:close a:shuffle .
[2,5,0,3,1,4]

8th, 42 bytes

Code

' noop 0 rot loop dup 1+ a:close a:shuffle

This code leaves array on TOS.

Usage and example

ok> 5 ' noop 0 rot loop dup 1+ a:close a:shuffle .
[2,5,0,3,1,4]

8th, 42 36 34 bytes

Code

>r [] ' a:push 0 r> loop a:shuffle

SED (Stack Effect Diagram) is n -- a

Usage and example

ok> 5 >r [] ' a:push 0 r> loop a:shuffle .
[2,5,0,3,1,4]
1
source | link

8th, 42 bytes

Code

' noop 0 rot loop dup 1+ a:close a:shuffle

This code leaves array on TOS.

Usage and example

ok> 5 ' noop 0 rot loop dup 1+ a:close a:shuffle .
[2,5,0,3,1,4]