Return to Revisions

2 of 2

Commonmark migration

edited Jun 17, 2020 at 9:04

J, 19 15 bytes

>.@(%&3)*1-3|<:

Probably need to golf this further...

1-indexed.

>> choose_sign =: 1-3|<: NB. 1-((n-1)%3) >> choose_magnitude =: >.@(%&3) NB. ceil(n/3) >> f =: choose_sign * choose_magnitude >> f 1 12 77 << 1 _4 0

Where >> means input (STDIN) and << means output (STDOUT).

answered May 28, 2016 at 18:02