login
A084495
Permutation of Z, obtained by reflecting the juggling sequence A084511 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, 40, 31, 44, 39, 50, 35, 54, 41, 52, 37, 48, 49, 60, 43, 56, 47, 62, 45, 58, 53, 68, 57, 66, 51, 70, 55, 64, 65, 76, 61, 78, 59, 72, 63, 74
OFFSET
1,2
COMMENTS
This permutation consists of three infinite cycles + infinite number of fixed points.
MAPLE
[seq(Z2N(A084495_Z2Z(N2Z(n))), n=1..45)];
N2Z := n -> ((-1)^n)*floor(n/2);
Z2N := z -> 2*abs(z)+`if`((z < 1), 1, 0);
A084495_Z2Z := z -> z+`if`((z > 0), A084511(z), `if`((z >= -3), 2*(-z), A084511(A084494((-z)-3))));
CROSSREFS
Sequence in context: A084491 A248298 A353572 * A084499 A070487 A167623
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 02 2003
STATUS
approved