This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A239543 a(n) is the minimum number greater than a(n-1) such that the concatenation a(n) U a(n-1) U ... U a(1) is a Niven number, starting with a(1)=1. 2
 1, 2, 6, 71, 73, 114, 141, 147, 150, 192, 255, 480, 824, 871, 879, 1014, 1270, 1331, 1359, 1458, 2244, 2547, 2635, 3021, 3447, 3575, 3984, 4035, 4138, 4187, 4554, 6042, 6419, 6431, 6602, 6765, 7074, 7599, 7878, 8163, 9768, 9948, 9975, 10397, 11572, 11961, 12025 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Paolo P. Lava and Giovanni Resta, Table of n, a(n) for n = 1..5000 (first 100 terms from Paolo P. Lava) FORMULA Starting with a(1)=1, the minimum number a(2) such that a(2) U a(1) is a Niven number is 2. In fact 21 / 3 = 7. Again the minimum a(3) such that a(3) U a(2) U a(1) is a Niven number is 6. In fact 621 / 9 = 69. Etc. MAPLE with(numtheory); S:=proc(s) local w; w:=convert(s, base, 10); sum(w[j], j=1..nops(w)); end: T:=proc(t) local w, x, y; x:=t; y:=0; while x>0 do x:=trunc(x/10); y:=y+1; od; end: P:=proc(q) local a, b, c, j, n;  a:=1; j:=1; print(1); for n from 1 to q do b:=T(a); c:=j*10^b+a; if type(c/S(c), integer) then a:=j*10^b+a; print(j); fi; j:=j+1; od; print(); end: P(10^6); CROSSREFS Cf. A005349, A239542. Sequence in context: A129785 A000896 A103527 * A180982 A195690 A171582 Adjacent sequences:  A239540 A239541 A239542 * A239544 A239545 A239546 KEYWORD nonn,base AUTHOR Paolo P. Lava, Mar 21 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 21 11:23 EDT 2019. Contains 328294 sequences. (Running on oeis4.)