A174025 Inverse permutation to A003100.

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

Offset

0,3

Links

Franklin T. Adams-Watters, Table of n, a(n) for n = 0..10000

Index entries for sequences that are permutations of the natural numbers

Prog

(PARI) inbase(n, b)=local(r); r=[]; while(n>0, r=concat([n%b], r); n\=b); r
tobase(v, b)=local(r); for(i=1, #v, r=r*b+v[i]); r
a(n)=local(v); v=inbase(n, 10); for(k=2, #v, if(v[k-1]%2==1, v[k]=9-v[k])); tobase(v, 10)

Crossrefs

Sequence in context: A003100 A118757 A118758 * A106649 A284030 A087121

Adjacent sequences: A174022 A174023 A174024 * A174026 A174027 A174028

Keyword

base,easy,nonn

Author

Franklin T. Adams-Watters, Mar 05 2010

Status

approved