|
|
A263579
|
|
Numbers n such that n and Fibonacci(n) have no common digits.
|
|
1
|
|
|
2, 3, 4, 6, 7, 8, 9, 10, 11, 14, 16, 20, 22, 27, 34, 66
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
There are no more terms <= 100000.
|
|
LINKS
|
|
|
EXAMPLE
|
66 is in the sequence because Fibonacci(66) = 27777890035288, which has no digits in common with 66.
|
|
MATHEMATICA
|
Select[Range[0, 80], IntersectingQ[IntegerDigits@ #, IntegerDigits@ Fibonacci@ #] == False &] (* Michael De Vlieger, Oct 22 2015 *)
|
|
PROG
|
(PARI) s=[]; for(n=0, 1000, if(setintersect(vecsort(digits(n), , 8), vecsort(digits(fibonacci(n)), , 8))==[], s=concat(s, n))); s
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|