|
%I #24 Sep 08 2022 08:45:53
%S 0,2,3,5,8,34,55,89,233,377,987,2584,6765,28657,46368,75025,832040,
%T 3524578,5702887,9227465,63245986,433494437,4807526976,7778742049,
%U 27777890035288,5527939700884757,2427893228399975082453,22698374052006863956975682
%N Fibonacci numbers whose decimal expansion does not contain the digit 1.
%C The probability that Fibonacci(n) contains no digit 1 decreases to 0 as n goes to infinity. Seems that its maximum value is Fibonacci(211) having 44 digits, none of them is 1.
%e 34 is a term since 34 is a Fibonacci number having no 1's. [corrected by _D. S. McNeil_, Nov 12 2010]
%t Select[Fibonacci[Range[0, 150]], DigitCount[#, 10, 1]==0&] (* _Harvey P. Dale_, Apr 18 2019 *)
%o (Magma) [Fibonacci(n): n in [0..150] | not 1 in Intseq(Fibonacci(n))]; // _Vincenzo Librandi_, May 09 2019
%Y Cf. A000045, A177194, A176253.
%K nonn,base
%O 1,2
%A _Carmine Suriano_, May 04 2010
%E a(1)=0 added by _Alois P. Heinz_, May 04 2019
|
