Search: id:A002407
Results 1-1 of 1 results found.
%I A002407 M4363 N1828
%S A002407 7,19,37,61,127,271,331,397,547,631,919,1657,1801,1951,2269,2437,2791,
%T A002407 3169,3571,4219,4447,5167,5419,6211,7057,7351,8269,9241,10267,11719,
%U A002407 12097,13267,13669,16651,19441,19927,22447,23497,24571,25117,26227
%N A002407 Cuban primes: primes of the form p = (x^3 - y^3 )/(x - y), x=y+1 (prime
hex numbers).
%C A002407 Primes equal to the difference of two consecutive cubes. - Lekraj Beedassy
(blekraj(AT)yahoo.com), Aug 21 2004
%C A002407 Primes p such that 4p = 1+3n^2 for some integer n. - Michael Somos Sep
15 2005
%C A002407 Equivalently, primes of the form p=1+3k(k+1) (and then k=floor(sqrt(p/
3))). Also: primes p such that n^2(p+n) is a cube for some n>0. -
M. F. Hasler (Maximilian.Hasler(AT)gmail.com), Nov 28 2007
%C A002407 The cuban primes may be generated from the hexagonal centered numbers
by eliminating all the items that may be expressed as 36*i*j+6*i+6*j+1
with i,j integer [From Giacomo Fecondo (jackfertile(AT)alice.it),
Mar 13 2009, Mar 17 2009]
%D A002407 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences,
Academic Press, 1995 (includes this sequence).
%D A002407 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973
(includes this sequence).
%D A002407 A. J. C. Cunningham, On quasi-Mersennian numbers, Mess. Math., 41 (1912),
119-146.
%D A002407 A. J. C. Cunningham, Binomial Factorisations, Vols. 1-9, Hodgson, London,
1923-1929; see Vol. 1, pp. 245-259.
%D A002407 J.-M. De Koninck & A. Mercier, 1001 Problemes en Theorie Classique Des
Nombres, Problem 241 pp. 39; 179, Ellipses Paris 2004.
%H A002407 T. D. Noe, Table of n, a(n) for n=1..1000
%H A002407 Eric Weisstein's World of Mathematics, Cuban Prime
%H A002407 Wikipedia, Cuban prime
a>
%e A002407 a(1) = 7 = 1+3k(k+1) with k=1 is the smallest prime of that form.
%e A002407 a(10^5) = 1792617147127 since this is the 100000th prime of that form.
%t A002407 lst={};Do[If[PrimeQ[p=(n+1)^3-n^3], (*Print[p];*)AppendTo[lst, p]], {n,
10^2}];lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug
21 2008]
%o A002407 (PARI) {a(n)= local(m, c); if(n<1, 0, c=0; m=1; while( c