cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A177231 Fibonacci numbers whose decimal expansion does not contain any digit "2".

This page as a plain text file.
%I A177231 #22 Sep 08 2022 08:45:53
%S A177231 0,1,3,5,8,13,34,55,89,144,377,610,987,1597,4181,6765,10946,17711,
%T A177231 46368,196418,317811,39088169,165580141,433494437,701408733,
%U A177231 1134903170,1836311903,17167680177565,117669030460994,806515533049393,99194853094755497,160500643816367088
%N A177231 Fibonacci numbers whose decimal expansion does not contain any digit "2".
%C A177231 The probability that Fibonacci(n) contains no 2's goes to zero as n grows to infinity. The maximum term is possibly Fibonacci(101) having 21 digits, none of them being "2".
%e A177231 a(5) = 8 is the 5th Fibonacci number having no digit 2's.
%p A177231 F:= combinat[fibonacci]:
%p A177231 q:= n-> not(2 in convert(n, base, 10)):
%p A177231 select(q, {F(n)$n=0..101})[];  # _Alois P. Heinz_, May 06 2019
%t A177231 Join[{0}, Select[Fibonacci[Range[2, 50]], DigitCount[#, 10, 2]==0&]] (* _Harvey P. Dale_, Oct 01 2017 *)
%o A177231 (Magma) [0] cat [Fibonacci(n): n in [2..150] | not 2 in Intseq(Fibonacci(n))]; // _Vincenzo Librandi_, May 09 2019
%Y A177231 Cf. A000045, A177194, A177195, A176253.
%K A177231 nonn,base
%O A177231 1,3
%A A177231 _Carmine Suriano_, May 05 2010
%E A177231 Edited by _Charles R Greathouse IV_, Aug 03 2010
%E A177231 a(1) changed from 1 to 0 by _Alois P. Heinz_, May 06 2019