Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #4 Dec 13 2014 13:55:11
%S 1,1,2,3,5,8,13,21,34,55,89,144,233,610,2584,4181,10946,46368,121393,
%T 196418,514229,832040,1346269,14930352,39088169,63245986,102334155,
%U 165580141,1836311903,12586269025,32951280099,139583862445,365435296162
%N Fibonacci numbers whose decimal expansion does not contain any digit 7
%C Probability that Fib(n) contains no digit 7 goes to zero as n grows to infinity. I suppose that the maximum number is Fib(224) having 47 digits.
%e a(14)=610 since it is the 14th Fibonacci containing no 7's.
%t Select[Fibonacci[Range[100]],DigitCount[#,10,7]==0&] (* _Harvey P. Dale_, Dec 13 2014 *)
%Y Cf. A000045, A177194, A177195, A177231, A177245, A177246, A176253, A177247
%K nonn,base
%O 1,3
%A _Carmine Suriano_, May 07 2010