The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A294662 Least k > a(n-1) such that k^3 has no digit in common with a(n-1) and a(n+1), a(0)=0. 1
 0, 1, 2, 4, 5, 6, 7, 8, 9, 10, 29, 55, 88, 90, 111, 200, 211, 400, 518, 654, 888, 889, 1111, 2825, 3131, 4244, 11111, 28222, 31535, 42449, 53355, 90000, 111181, 590000, 618181, 900000, 1111115, 9000000, 11111115, 60660090, 114144155 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS This is the sequence which corresponds to the original definition of A030290, before it was corrected to reproduce the data (and the intended meaning). LINKS Table of n, a(n) for n=0..40. EXAMPLE a(3) cannot be 3 because 3^3 = 27 would have the digit '2' in common with a(2) = 2, therefore a(3) = 4, which does not violate this condition. After a(9) = 10, none of the numbers { 11, ..., 19 } can follow, because they have the digit '1' in common with a(9)^3 = 1000. Numbers { 20, ..., 28 } are excluded because their cube would have a digit '0' or '1' in common with a(9). Therefore, a(10) = 29 which hasn't a digit in common with a(9)^3, nor has 29^3 = 24389 a digit in common with a(9). a(38) = 11111115 with 11111115^3 = 1371743552812575445875 using all digits except for 0, 6 and 9. So a(39) = 60660090 is possible, with a(39)^3 = 223207688999086038729000 having all digits except for 1, 4 and 5. PROG (PARI) nxt(a, L=oo, D(a)=Set(digits(a)), S=D(a), T=D(a^3))={for(k=a+1, L, #setintersect(D(k), T)||#setintersect(D(k^3), S)||return(k))} A294662=List(); a=0; until(!a=nxt(a, 1e7), write("/tmp/A294662.txt", #A294662, " ", a); listput(A294662, a)) CROSSREFS Cf. A030290, A294663. Sequence in context: A026509 A039166 A026485 * A183301 A308065 A047318 Adjacent sequences: A294659 A294660 A294661 * A294663 A294664 A294665 KEYWORD nonn,base AUTHOR M. F. Hasler, Nov 09 2017 STATUS approved

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

Last modified September 15 22:07 EDT 2024. Contains 375958 sequences. (Running on oeis4.)