%I A062066
%S A062066 2,727,2017,11807,15193,39679,70913,124199,314777,1090151,1895833,
%T A062066 3017167,4982833,8841167,10841833,14570351,17587081,24557111,26095889,
%U A062066 27061487,32257513,45051263,46073737,61776439,72441289,74756663,82707337,
114430031,157667761,170841239
%N A062066 a(1) = 2; a(n) is the smallest prime > a(n-1) such that a(n) + a(n-1)
is a cube.
%H A062066 Harry J. Smith, <a href="b062066.txt">Table of n, a(n) for n=1,...,45</
a>
%e A062066 The next term after 727 is 2017 as 727 + 2017 = 2744 = 14^3.
%o A062066 (PARI) iscube(x)= { f=factor(x)~; for(i=1, length(f), if (t=f[2, i]%3,
return(0))); return(1); } { a=2; for (n=1, 45, a1=a; if (n>1, until
(iscube(a + a1), a=nextprime(a + 1))); write("b062066.txt", n, "
", a) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 31
2009]
%Y A062066 Cf. A062064.
%Y A062066 Sequence in context: A156008 A103169 A082438 this_sequence A082621 A053600
A090275
%Y A062066 Adjacent sequences: A062063 A062064 A062065 this_sequence A062067 A062068
A062069
%K A062066 nonn
%O A062066 1,1
%A A062066 Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jun 12 2001
%E A062066 More terms from Larry Reeves (larryr(AT)acm.org), Jun 21 2001
%E A062066 Further terms from Philip Sung (phil(AT)main.nu), Sep 11 2001
|