login
A305463
Inverse permutation to A305458.
2
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 22, 23, 12, 13, 14, 15, 10, 11, 18, 19, 20, 21, 28, 29, 24, 25, 26, 27, 16, 17, 30, 31, 32, 33, 124, 125, 36, 37, 38, 39, 202, 203, 132, 133, 134, 135, 130, 131, 168, 169, 170, 171, 58, 59, 84, 85, 86, 87, 76, 77, 60, 61, 62, 63
OFFSET
0,3
PROG
(PARI) a(n) = my (v=0, k=1, r=2, p=1); while (n, my (d=n % r); if (d, my (t = lift(Mod(d, r)/Mod(k, r))); v += t * p; k *= t); n \= r; p *= r; r = nextprime(r+1)); return (v)
CROSSREFS
Cf. A305458.
Sequence in context: A342810 A086548 A083434 * A037344 A062998 A249443
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Jun 01 2018
STATUS
approved