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.

A127459 Prime numbers n such that there are no primes between n and n+n^(1/3).

This page as a plain text file.
%I A127459 #13 Sep 12 2017 14:03:57
%S A127459 3,5,7,13,19,23,31,37,43,47,53,61,73,83,89,113,131,139,151,157,167,
%T A127459 173,181,199,211,241,283,293,317,337,359,389,401,409,421,449,467,479,
%U A127459 491,509,523,547,577,619,631,661,691,709,773,787,797,811,829,839,863,887
%N A127459 Prime numbers n such that there are no primes between n and n+n^(1/3).
%C A127459 Subsequence of A127458. - _Michel Marcus_, Nov 06 2013
%H A127459 Donovan Johnson, <a href="/A127459/b127459.txt">Table of n, a(n) for n = 1..396</a> (probably complete)
%t A127459 a = {}; Do[If[(PrimePi[x + x^(1/3)] - PrimePi[x] == 0) && (PrimeQ[x]), AppendTo[a, x]], {x, 1, 20000}]; a
%t A127459 Select[Prime[Range[200]],PrimePi[#]==PrimePi[#+Surd[#,3]]&] (* _Harvey P. Dale_, Sep 12 2017 *)
%o A127459 (PARI) is(n)=isprime(n) && (nextprime(n+1)-n)^3>n \\ _Charles R Greathouse IV_, Dec 09 2014
%Y A127459 Cf. A127441, A127458.
%K A127459 nonn
%O A127459 1,1
%A A127459 _Artur Jasinski_, Jan 15 2007