A177245 Fibonacci numbers whose decimal expansion does not contain any digit 3.
0, 1, 2, 5, 8, 21, 55, 89, 144, 610, 987, 1597, 2584, 4181, 6765, 10946, 17711, 28657, 75025, 196418, 514229, 5702887, 9227465, 24157817, 165580141, 267914296, 4807526976, 7778742049, 12586269025, 86267571272, 591286729879, 956722026041, 1548008755920
Offset: 1
Examples
a(6)=21 since 21 is the 6th Fibonacci having no 3's.
Programs
-
Magma
[0] cat [Fibonacci(n): n in [2..150] | not 3 in Intseq(Fibonacci(n))]; // Vincenzo Librandi, May 09 2019
-
Mathematica
Join[{0}, Select[Fibonacci[Range[2, 60]], DigitCount[#, 10, 3]==0&]] (* Vincenzo Librandi, May 09 2019 *)
Extensions
a(1) changed from 1 to 0 by Vincenzo Librandi, May 09 2019
Comments