|
|
A256292
|
|
Numbers which have only digits 6 and 7 in base 10.
|
|
15
|
|
|
6, 7, 66, 67, 76, 77, 666, 667, 676, 677, 766, 767, 776, 777, 6666, 6667, 6676, 6677, 6766, 6767, 6776, 6777, 7666, 7667, 7676, 7677, 7766, 7767, 7776, 7777, 66666, 66667, 66676, 66677, 66766, 66767, 66776, 66777, 67666, 67667
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Flatten[Table[FromDigits[#, 10]&/@Tuples[{6, 7}, n], {n, 5}]]
|
|
PROG
|
(Magma) [n: n in [1..35000] | Set(IntegerToSequence(n, 10)) subset {7, 6}];
(PARI) A256292(n)=vector(#n=binary(n+1)[2..-1], i, 10^(#n-i))*n~+10^#n\9*6
(Magma) [n: n in [1..100000] | Set(Intseq(n)) subset {6, 7}]; // Vincenzo Librandi, Aug 19 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|