A256292 Numbers which have only digits 6 and 7 in base 10.
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
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..8190
- Index entries for 10-automatic sequences.
Crossrefs
Programs
-
Magma
[n: n in [1..35000] | Set(IntegerToSequence(n, 10)) subset {7, 6}];
-
Magma
[n: n in [1..100000] | Set(Intseq(n)) subset {6,7}]; // Vincenzo Librandi, Aug 19 2016
-
Mathematica
Flatten[Table[FromDigits[#,10]&/@Tuples[{6,7},n],{n,5}]]
-
PARI
A256292(n)=vector(#n=binary(n+1)[2..-1],i,10^(#n-i))*n~+10^#n\9*6