A325448 Fibonacci numbers whose decimal expansion contains the digit 1.

1, 13, 21, 144, 610, 1597, 4181, 10946, 17711, 121393, 196418, 317811, 514229, 1346269, 2178309, 14930352, 24157817, 39088169, 102334155, 165580141, 267914296, 701408733, 1134903170, 1836311903, 2971215073, 12586269025, 20365011074, 32951280099

Offset

1,2

Comments

Complement of A177195.

Links

Table of n, a(n) for n=1..28.

Mathematica

Rest[Select[Fibonacci@Range@50, MemberQ[IntegerDigits[#], 1] &]]

Prog

(Magma) [ Fibonacci(n): n in [2..55] |  1 in Intseq(Fibonacci(n)) ];
(PARI) terms(n) = my(i=0); for(k=2, oo, my(fib=fibonacci(k), fibd=digits(fib)); if(setintersect(vecsort(fibd), vector(#fibd, x, 1)), print1(fib, ", "); i++); if(i>=n, break))
/* Print initial 30 terms as follows */
terms(30) \\ Felix Fröhlich, May 04 2019

Crossrefs

Cf. A000045, A177195.

Sequence in context: A147435 A269309 A203854 * A056523 A056512 A362098

Adjacent sequences: A325445 A325446 A325447 * A325449 A325450 A325451

Keyword

nonn,base

Author

Vincenzo Librandi, May 03 2019

Status

approved