A182575 - OEIS

A182575

Primes with equal number of 1's and 0's in their representation in base of Fibonacci numbers (A014417).

2, 7, 17, 19, 53, 373, 983, 6709, 6761, 6763, 17333, 17707, 43783, 103681, 317789, 785671, 2177321, 5581493, 38770357, 39070457, 1836305137, 10749957121, 12586147631, 12586251313, 32951279111, 86252640919, 86267571127, 86267571263, 213265164691, 225845730829

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

EXAMPLE

Representation of 19 is 101001, three 1's and three 0's, so 19 is in the sequence.

Representation of 23 is 1000010, two 1's and five 0's, so 23 is not in the sequence.

MATHEMATICA

nn = 30; f = Join[{0}, Accumulate[Fibonacci[Range[2, 2*nn, 2] - 1]]]; t = Table[hi = f[[n+1]] - 1; Reverse[Table[hi - f[[i]], {i, n - 1}]], {n, 2, nn}]; Select[Flatten[t], PrimeQ] (* T. D. Noe, May 07 2012 *)

CROSSREFS

Cf. A003714, A014417, A000045, A000040.

Sequence in context: A045378 A101568 A291528 * A074884 A227144 A105911

Adjacent sequences: A182572 A182573 A182574 * A182576 A182577 A182578

KEYWORD

nonn

AUTHOR

Alex Ratushnyak, May 05 2012

EXTENSIONS

Extended by T. D. Noe, May 07 2012

STATUS

approved