login
A117509
Numbers whose base-3, base-4, base-5, and base-6 expansions contain no 1's.
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
OFFSET
1,2
EXAMPLE
560 is in the sequence because 560 = 202202_3, 20300_4, 4220_5 and 2332_6.
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, Jul 25 2006
MATHEMATICA
Select[Range[0, 880000000], Count[Flatten[Table[IntegerDigits[#, n], {n, 3, 6}]], 1]==0&] (* Harvey P. Dale, Oct 30 2011 *) (* The program takes a long time to generate all the terms of the sequence *)
CROSSREFS
Subsequence of A117496 (base-3 and base-4).
Sequence in context: A336784 A201247 A265633 * A285690 A201603 A200964
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Apr 26 2006
EXTENSIONS
More terms from Joshua Zucker, Aug 12 2006
STATUS
approved