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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A138089 Numbers n such that n^0+(n+1)^1+(n+2)^2+(n+3)^3+(n+4)^4+(n+5)^5+(n+6)^6+(n+7)^7+(n+8)^8+(n+9)^9+(n+10)^10+(n+11)^11+(n+12)^12 is a prime. 1
2, 13, 42, 46, 57, 102, 104, 111, 167, 171, 182, 189, 191, 207, 244, 268, 298, 312, 322, 349, 366, 368, 371, 442, 466, 477, 508, 517, 553, 661, 674, 686, 728, 737, 748, 776, 829, 886, 921, 938, 946, 1053, 1109, 1117, 1134, 1152, 1171, 1172, 1186, 1197, 1211 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

MATHEMATICA

a={}; Do[If[PrimeQ[n^0+(n+1)^1+(n+2)^2+(n+3)^3+(n+4)^4+(n+5)^5+(n+6)^6+(n+7)^7+(n+8)^8+(n+9)^9+(n+10)^10+(n+11)^11+(n+12)^12], AppendTo[a, n]], {n, 10^2*8}]; a

Transpose[Select[Partition[Range[800], 13, 1], PrimeQ[Total[#^Range[ 0, 12]]]&]] [[1]] (* Harvey P. Dale, Jul 10 2013 *)

CROSSREFS

Sequence in context: A157185 A219054 A154354 * A296197 A026594 A240173

Adjacent sequences:  A138086 A138087 A138088 * A138090 A138091 A138092

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, May 06 2008

EXTENSIONS

More terms from and first Mathematica program corrected by Harvey P. Dale, Jul 10 2013

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 November 16 17:04 EST 2019. Contains 329201 sequences. (Running on oeis4.)