login
A084499
Permutation of Z, obtained by reflecting the juggling sequence A084521 from positive to negative numbers (with zero thrown at beat 0), folded to N with functions N2Z and Z2N.
7
1, 8, 2, 12, 4, 10, 6, 16, 3, 18, 7, 14, 5, 24, 13, 20, 9, 22, 11, 30, 17, 28, 19, 26, 15, 34, 25, 36, 23, 38, 21, 32, 33, 42, 27, 46, 29, 44, 31, 40, 41, 52, 35, 48, 39, 54, 37, 50, 45, 60, 49, 58, 43, 62, 47, 56, 57, 68, 53, 70, 51, 64, 55, 66, 63, 76, 65, 78, 59, 74, 61, 72
OFFSET
1,2
COMMENTS
This permutation consists of three infinite cycles + infinite number of fixed points.
MAPLE
[seq(Z2N(A084499_Z2Z(N2Z(n))), n=1..45)];
N2Z := n -> ((-1)^n)*floor(n/2);
Z2N := z -> 2*abs(z)+`if`((z < 1), 1, 0);
A084499_Z2Z := z -> z+`if`((z > 0), A084511(z), `if`((z >= -3), 2*(-z), A084521(A084498((-z)-3))));
CROSSREFS
Sequence in context: A248298 A353572 A084495 * A070487 A167623 A040063
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 02 2003
STATUS
approved