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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A113826 Numbers n such that (n+1)^7 - n^7 is prime. 2
1, 3, 6, 7, 8, 9, 11, 16, 25, 32, 35, 38, 40, 48, 50, 54, 58, 65, 77, 78, 79, 87, 95, 97, 103, 112, 117, 119, 122, 134, 135, 141, 145, 155, 156, 159, 161, 172, 175, 193, 209, 218, 219, 220, 221, 223, 231, 233, 246, 280, 290, 296, 297, 304, 309, 310, 311, 322, 327 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

MAPLE

L:= NULL: for x from 1 to 1000 do if isprime((x+1)^7 - x^7) then L:= L, x fi od: L;

MATHEMATICA

Flatten[Position[Partition[Range[400]^7, 2, 1], _?(PrimeQ[Last[#]- First[ #]]&), {1}, Heads->False]] (* Harvey P. Dale, Aug 20 2013 *)

Select[Range[0, 400], PrimeQ[(# + 1)^7 - #^7] &] (* Vincenzo Librandi, Apr 20 2014 *)

PROG

(MAGMA) [n: n in [0..350] | IsPrime((n+1)^7-n^7)]; // Vincenzo Librandi, Apr 20 2014

(PARI) is(n)=isprime((n+1)^7-n^7) \\ Charles R Greathouse IV, Jun 06 2017

CROSSREFS

Sequence in context: A299493 A047559 A288742 * A053030 A189822 A051205

Adjacent sequences:  A113823 A113824 A113825 * A113827 A113828 A113829

KEYWORD

easy,nonn

AUTHOR

Robert Israel, Jan 24 2006

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 18 22:08 EDT 2019. Contains 322237 sequences. (Running on oeis4.)