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

 

Logo

Please make a donation to keep the OEIS running. We are now in our 55th year. In the past year we added 12000 new sequences and reached 8000 citations (which often say "discovered thanks to the OEIS"). We need to raise money to hire someone to manage submissions, which would reduce the load on our editors and speed up editing.
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A088548 Primes of the form  n^4 + n^3 + n^2 + n + 1. 14
5, 31, 2801, 22621, 30941, 88741, 245411, 292561, 346201, 637421, 732541, 837931, 2625641, 3500201, 3835261, 6377551, 15018571, 16007041, 21700501, 28792661, 30397351, 35615581, 39449441, 48037081, 52822061, 78914411, 97039801 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

These numbers when >= 31 are primes repunits 11111_n in a base n >= 2, so except 5, they are all Brazilian primes belonging to A085104. (See Links "Les nombres brésiliens", § V.4 - § V.5.) A008858 is generated by the bases n present in A049409. - Bernard Schott, Dec 19 2012

LINKS

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

Bernard Schott, Les nombres brésiliens, Quadrature, no. 76, avril-juin 2010, pages 30-38; included here with permission from the editors of Quadrature.

FORMULA

A000040 intersect A053699. - R. J. Mathar, Feb 07 2014

EXAMPLE

a(2) = 31 is prime and 31 = 2^4 + 2^3 + 2^2 + 2 + 1.

MATHEMATICA

lst={}; Do[a=1+n+n^2+n^3+n^4; If[PrimeQ[a], AppendTo[lst, a]], {n, 6!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jun 02 2009 *)

Select[Table[n^4+n^3+n^2+n+1, {n, 0, 2000}], PrimeQ] (* Vincenzo Librandi, Jul 16 2012 *)

PROG

(PARI) polypn(n, p) = { for(x=1, n, if(p%2, y=2, y=1); for(m=1, p, y=y+x^m; ); if(isprime(y), print1(y", ")); ) }

(MAGMA) [a: n in [0..200] | IsPrime(a) where a is n^4+n^3+n^2+n+1]; // Vincenzo Librandi, Jul 16 2012

CROSSREFS

Cf. A002383, A049409, A085104, A088550.

Sequence in context: A059301 A225158 A299887 * A244622 A278574 A062631

Adjacent sequences:  A088545 A088546 A088547 * A088549 A088550 A088551

KEYWORD

nonn,easy

AUTHOR

Cino Hilliard, Nov 17 2003

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 December 13 06:26 EST 2019. Contains 329968 sequences. (Running on oeis4.)