A130694 Exponents of powers of 2 that contain all ten digits.
68, 70, 79, 82, 84, 87, 88, 89, 94, 95, 96, 97, 98, 100, 101, 103, 104, 105, 106, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144
Offset: 1
Examples
2^68 = 295147905179352825856.
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
A2 := {}; Do[If[Length[Union[ IntegerDigits[2^ n]]] == 10, A2 = Join[A2, {n}]], {n, 1, 200}]; Print[A2] Select[Range[200],Min[DigitCount[2^#]]>0&] (* Harvey P. Dale, Aug 03 2019 *)
-
PARI
is_A130694(n)=9<#Set(Vec(Str(1<
M. F. Hasler, Aug 25 2012
Formula
a(n) = n + 91 for n >= 78 (conjectured). - Chai Wah Wu, Jan 27 2020
Extensions
Displayed terms double-checked by M. F. Hasler, Aug 25 2012
Comments