A117509 Numbers whose base-3, base-4, base-5, and base-6 expansions contain no 1's.

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

Links

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

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

Adjacent sequences: A117506 A117507 A117508 * A117510 A117511 A117512

Keyword

base,nonn

Author

Zak Seidov, Apr 26 2006

Extensions

More terms from Joshua Zucker, Aug 12 2006

Status

approved