cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A182575 #9 May 07 2012 23:55:55
%S A182575 2,7,17,19,53,373,983,6709,6761,6763,17333,17707,43783,103681,317789,
%T A182575 785671,2177321,5581493,38770357,39070457,1836305137,10749957121,
%U A182575 12586147631,12586251313,32951279111,86252640919,86267571127,86267571263,213265164691,225845730829
%N A182575 Primes with equal number of 1's and 0's in their representation in base of Fibonacci numbers (A014417).
%e A182575 Representation of 19 is 101001, three 1's and three 0's, so 19 is in the sequence.
%e A182575 Representation of 23 is 1000010, two 1's and five 0's, so 23 is not in the sequence.
%t A182575 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 *)
%Y A182575 Cf. A003714, A014417, A000045, A000040.
%K A182575 nonn
%O A182575 1,1
%A A182575 _Alex Ratushnyak_, May 05 2012
%E A182575 Extended by _T. D. Noe_, May 07 2012