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