login
A084455
Permutation of Z, obtained by reflecting the juggling sequence A084452 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, 14, 6, 8, 9, 20, 3, 22, 5, 24, 7, 16, 17, 18, 19, 32, 11, 28, 13, 34, 15, 26, 27, 38, 23, 30, 31, 44, 21, 46, 25, 36, 37, 50, 29, 40, 41, 42, 43, 58, 33, 52, 35, 48, 49, 62, 39, 64, 47, 54, 55, 56, 57, 72, 45, 60, 61, 74, 51, 76, 53, 66, 67, 68, 69, 70, 71, 86
OFFSET
1,2
COMMENTS
This permutation consists of three infinite cycles + infinite number of fixed points.
MAPLE
[seq(Z2N(A084455_Z2Z(N2Z(n))), n=1..45)];
N2Z := n -> ((-1)^n)*floor(n/2);
Z2N := z -> 2*abs(z)+`if`((z < 1), 1, 0);
A084455_Z2Z := z -> z+`if`((z > 0), A084452(z), `if`((z >= -3), 2*(-z), A084452(A084454((-z)-3))));
CROSSREFS
Sequence in context: A317387 A303784 A278649 * A069532 A084461 A367811
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 02 2003
STATUS
approved