A302852 Permutation of nonnegative integers: a(0) = 0; for n >= 1, a(n) = 1+A225901(A225901(n)-1).

0, 1, 6, 3, 2, 5, 16, 7, 12, 9, 8, 11, 22, 13, 18, 15, 14, 17, 4, 19, 24, 21, 20, 23, 58, 25, 30, 27, 26, 29, 40, 31, 36, 33, 32, 35, 46, 37, 42, 39, 38, 41, 28, 43, 48, 45, 44, 47, 82, 49, 54, 51, 50, 53, 64, 55, 60, 57, 56, 59, 70, 61, 66, 63, 62, 65, 52, 67, 72, 69, 68, 71, 106, 73, 78, 75, 74, 77, 88, 79, 84, 81, 80, 83, 94, 85

Offset

0,3

Links

Antti Karttunen, Table of n, a(n) for n = 0..10079

David Newman, et al., New sequences from old, Discussion on SeqFan-mailing list, January 2018.

Index entries for sequences related to factorial base representation

Index entries for sequences that are permutations of the natural numbers

Formula

a(0) = 0; for n >= 1, a(n) = 1+A225901(A225901(n)-1).

Prog

(PARI)
A225901(n) = { my(s=0, d, k=2); while(n, d=n%k; n=n\k; if(d, s += (k-d)*(k-1)!); k=k+1); (s); };
A302852(n) = if(!n, n, 1+A225901(A225901(n)-1));

Crossrefs

Cf. A302851 (inverse).

Cf. A225901.

Sequence in context: A010494 A333239 A078333 * A348694 A049605 A088395

Adjacent sequences: A302849 A302850 A302851 * A302853 A302854 A302855

Keyword

nonn,base

Author

Antti Karttunen, Apr 26 2018

Status

approved