|
| |
|
|
A117482
|
|
Numbers with no 1's in their base-3, base-4, and base-5 expansions. Intersection of A005823, A023709, and A023725.
|
|
0
|
|
|
|
0, 2, 60, 62, 512, 560, 2178, 15072, 15074, 15090, 40992, 40994, 41004, 41010, 43760, 43818, 43820, 45260, 45704, 45710, 45738, 45740, 45744, 53192, 53198, 57512, 57518, 57570, 163842, 163854, 164000, 164018, 164024
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
No more terms <= 1000000. - Emeric Deutsch, Apr 30 2006
No more terms <= 5000000. - Harvey P. Dale, Jan 17 2014
|
|
|
LINKS
|
Table of n, a(n) for n=1..33.
|
|
|
EXAMPLE
|
560 is in the sequence because in base 3 it is 202202, in base 4 it is 20300 and in base 5 it is 4220.
|
|
|
MAPLE
|
a:=proc(n) if member(1, convert(convert(n, base, 3), set) union convert(convert(n, base, 4), set) union convert(convert(n, base, 5), set))=false then n else fi end: seq(a(n), n=0..170000); # Emeric Deutsch, Apr 30 2006
|
|
|
MATHEMATICA
|
Select[Range[0, 200000], Table[DigitCount[#, n, 1], {n, 3, 5}]=={0, 0, 0}&] (* Harvey P. Dale, Jan 17 2014 *)
|
|
|
CROSSREFS
|
Cf. A005823, A023709, A023725.
Sequence in context: A202622 A113549 A268432 * A078511 A354770 A087004
Adjacent sequences: A117479 A117480 A117481 * A117483 A117484 A117485
|
|
|
KEYWORD
|
base,nonn
|
|
|
AUTHOR
|
Zak Seidov, Apr 26 2006
|
|
|
STATUS
|
approved
|
| |
|
|
