login
A086068
Min{k: A086066(k) = n}.
4
0, 1, 10, 2, 20, 12, 102, 3, 30, 13, 103, 23, 203, 123, 1023, 4, 40, 14, 104, 24, 204, 124, 1024, 34, 304, 134, 1034, 234, 2034, 1234, 10234, 5, 50, 15, 105, 25, 205, 125, 1025, 35, 305, 135, 1035, 235, 2035, 1235, 10235, 45, 405, 145, 1045, 245, 2045
OFFSET
1,3
COMMENTS
Sequence is finite with last term a(2^10-1)=a(1023)=1023456789; A086067(1023456789)=1111111111.
LINKS
Nathaniel Johnston, Table of n, a(n) for n = 1..1023 (full sequence)
MAPLE
A086068 := proc(n) local b, k, s: s:={}: if(n=1)then return 0: fi: b:=convert(n, base, 2): for k from 1 to nops(b) do if(b[k] = 1)then s:=s union {k-1}: fi: od: s:=sort(convert(s, list)): if(s[1]=0)then return s[2]*10^(nops(s)-1)+add(s[j]*10^(nops(s)-j), j=3..nops(s)): else return add(s[j]*10^(nops(s)-j), j=1..nops(s)): fi: end: seq(A086068(n), n=1..53); # Nathaniel Johnston, Jun 01 2011
CROSSREFS
KEYWORD
nonn,fini,full,easy
AUTHOR
Reinhard Zumkeller, Jul 08 2003
STATUS
approved