A076564 List of numbers k such that the k-th Fibonacci number (A000045) does not contain the digit zero.
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 16, 17, 18, 19, 20, 22, 23, 24, 26, 27, 28, 29, 31, 33, 35, 37, 39, 42, 43, 53, 54, 55, 56, 57, 58, 78, 80, 85, 87, 97, 125, 184
Offset: 1
References
- A. Altassan and F. Luca, On a curious property of F_{184}, Fib. Q., 57:4 (2019), 363-365.
Links
- Shyam Sunder Gupta, Can You Find no. 9
Programs
-
Mathematica
Select[ Range[50000], Union[ IntegerDigits[ Fibonacci[ # ]]] [[1]] != 0 & ] Select[Range[200],DigitCount[Fibonacci[#],10,0]==0&] (* Harvey P. Dale, May 15 2019 *)
-
PARI
isok(k) = #select(x->(x==0), digits(fibonacci(k))) == 0; select(isok, [1..1000]) \\ Michel Marcus, Feb 11 2025
Comments