login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A095785 Values of n for which A095777(n) is 16 (those terms which are expressible in decimal digits for bases 2 through 17, but not for base 18). 0
17, 105, 289, 294, 902, 903, 904, 905, 918, 919, 5491, 5492, 5493, 5508, 5525, 16905, 16920, 16921, 270354, 271665, 271700, 271701, 275205, 275256, 3342391, 3342392, 3342405, 3342408, 3342409, 3342421, 3342422, 3342423, 3342424, 3342425, 3342438, 3342439 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..36.

EXAMPLE

a(5)=902 because 902 when expressed in successive bases starting at 2 will produce its first non-decimal digit at base 18. Like so: 1110000110, 1020102, 32012, 12102, 4102, 2426, 1606, 1212, 902, 750, 632, 545, 486, 402, 386, 321. In base 18, 902 is 2E2.

MAPLE

S := []; for n from 1 to 15000 do; if 1>0 then; ct := 0; ok := true; b := 2; if (n>9) then; while ok=true do; L := convert(n, base, b); for e in L while ok=true do; if (e > 9) then ok:=false; fi; od; if ok=true then; ct := ct + 1; b := b + 1; fi; od; fi; if ct=16 then S := [op(S), n]; fi; fi; od; S;

MATHEMATICA

b18Q[n_]:=Module[{idn=Table[IntegerDigits[n, b], {b, 2, 18}]}, Max[Flatten[Most[ idn]]]<10 && Max[Last[idn]]>9]; Select[Range[50000], b18Q] (* Harvey P. Dale, Feb 09 2013 *)

CROSSREFS

Cf. A095777.

Sequence in context: A160219 A242316 A329386 * A194131 A194475 A164745

Adjacent sequences:  A095782 A095783 A095784 * A095786 A095787 A095788

KEYWORD

base,nonn

AUTHOR

Chuck Seggelin (seqfan(AT)plastereddragon.com), Jun 05 2004

EXTENSIONS

More terms from Harvey P. Dale, Feb 09 2013

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 28 10:48 EDT 2021. Contains 347714 sequences. (Running on oeis4.)