A263580 Numbers n such that n and Fibonacci(n) have at least one common digit.

0, 1, 5, 12, 13, 15, 17, 18, 19, 21, 23, 24, 25, 26, 28, 29, 30, 31, 32, 33, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80

Offset

0,3

Comments

This is the complement of A263579.

Links

Colin Barker, Table of n, a(n) for n = 0..1000

Example

17 is in the sequence because Fibonacci(17) = 1597, which has two digits in common with 17.
18 is in the sequence because Fibonacci(18) = 2584, which has one digit in common with 18.

Mathematica

Select[Range[0, 80], IntersectingQ[IntegerDigits@ #, IntegerDigits@ Fibonacci@ #] &] (* Michael De Vlieger, Oct 22 2015 *)

Prog

(PARI) s=[0]; for(n=1, 100, if(setintersect(vecsort(digits(n), , 8), vecsort(digits(fibonacci(n)), , 8))!=[], s=concat(s, n))); s

Crossrefs

Cf. A000045, A263579.

Sequence in context: A380821 A367573 A076537 * A110134 A014156 A367355

Adjacent sequences: A263577 A263578 A263579 * A263581 A263582 A263583

Keyword

nonn,base

Author

Colin Barker, Oct 22 2015

Status

approved