login
A182569
Primes that have two terms in their Zeckendorf representation.
5
7, 11, 23, 29, 37, 47, 97, 149, 157, 199, 241, 379, 521, 613, 631, 1021, 1741, 2207, 3571, 9349, 10949, 11933, 17713, 46381, 46457, 46601, 50549, 75169, 196439, 203183, 214129, 560597, 832129, 2178343, 3010349, 3531343, 14930441, 15444581, 16276621, 24157961
OFFSET
1,1
COMMENTS
Primes of the form Fibonacci(x)+Fibonacci(y), x-y>1.
FORMULA
Intersection of A000040 and A179242. - Michel Marcus, May 28 2013
EXAMPLE
7 = 5+2. 11=8+3. 23=21+2. 29 =21+8.
MATHEMATICA
nn = 40; f = Fibonacci[Range[nn]]; ps = {}; Do[ps = Union[ps, Select[f[[k]] + Delete[f, {{k-1}, {k}, {k+1}}], PrimeQ]], {k, 4, nn-1}]; ps (* T. D. Noe, May 08 2012 *)
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, May 05 2012
EXTENSIONS
More terms from T. D. Noe, May 08 2012
STATUS
approved