login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A158796 Index of first of three successive primes which sum to a cube. 2
85, 3696, 79700, 263166, 283353, 434935, 678277, 950264, 1043678, 1266169, 1321463, 1436753, 2629623, 3568796, 3604676, 3676738, 3713180, 5096401, 5558697, 7162624, 9303565, 9504536, 10988577, 12778681, 13108392, 18730119 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

EXAMPLE

a(1)=85 because p(85)+p(86)+p(87)=439+443+449=11^3=(A076306(1))^3

a(2)=3696 because p(3696)+p(3697)+p(3698)=34603+34607+34613=47^3=(A076306(2))^3.

MAPLE

count:= 0:

for x from 3 while count < 30 do

  y:= x^3;

  r:= floor(y/3);

  p0:= prevprime(r); p1:= nextprime(p0); p2:= nextprime(p1);

  while p0 + p1 + p2 > y do

    p2:= p1;

    p1:= p0;

    p0:= prevprime(p0);

  od:

  while p0 + p1 + p2 < y do

    p0:= p1;

    p1:= p2;

    p2:= nextprime(p2);

  od:

  if p0 + p1 + p2 = y then

    count:= count+1;

    A[count]:= numtheory:-pi(p0);

  fi

od:

seq(A[i], i=1..count); # Robert Israel, Feb 10 2017

CROSSREFS

Cf. A076304, A076306.

Sequence in context: A017801 A201799 A017748 * A201796 A093285 A011813

Adjacent sequences:  A158793 A158794 A158795 * A158797 A158798 A158799

KEYWORD

nonn

AUTHOR

Zak Seidov, Nov 12 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 25 15:51 EST 2017. Contains 282613 sequences.