|
| |
|
|
A117509
|
|
Numbers with no 1's in base 3, 4, 5 & 6 expansions.
|
|
0
| |
|
|
0, 2, 560, 43760, 163854, 164018, 870899850, 870899852, 870900354, 870900360, 870900362, 870907842, 870907848, 870907850, 870977340, 870977342, 871016994, 871017138, 871017144, 871018188, 871018190, 871018440, 871018442, 871025312
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| 560 is in the sequence because its base 3, 4, 5 and 6 expansions are 202202, 20300, 4220 and 2332, respectively.
|
|
|
MAPLE
| a:=proc(n) if member(1, convert(n, base, 3))=false and member(1, convert(n, base, 4))=false and member(1, convert(n, base, 5))=false and member(1, convert(n, base, 6))=false then n else fi end: seq(a(n), n=0..300000); - Emeric Deutsch (deutsch(AT)duke.poly.edu), Jul 25 2006
|
|
|
MATHEMATICA
| Select[Range[0, 880000000], Count[Flatten[Table[IntegerDigits[#, n], {n, 3, 6}]], 1]==0&] (* From Harvey P. Dale, Oct 30 2011 *) (* The program takes a long time to generate all the terms of the sequence *)
|
|
|
CROSSREFS
| Sequence in context: A120840 A058429 A201247 * A201603 A200964 A049364
Adjacent sequences: A117506 A117507 A117508 * A117510 A117511 A117512
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Apr 26 2006
|
|
|
EXTENSIONS
| More terms from Joshua Zucker (joshua.zucker(AT)stanfordalumni.org), Aug 12 2006
|
| |
|
|