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

Author

Franklin T. Adams-Watters, Mar 05 2010

Keywords

• base
• easy
• nonn

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

Programs

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)