login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes of the form 1 + prime(k) + (prime(k + 1))^2 + (prime(k + 2))^3 + (prime(k + 3))^4 for some k.
1

%I #5 Nov 27 2012 12:59:43

%S 15013,29947,85847,287003,1513364201,106487271217,357496242329,

%T 403978515383,459328620433,592202893027,689515796537,745616750069,

%U 965433908149,1268409806933,1278025436593,5052343682767,8777496441409

%N Primes of the form 1 + prime(k) + (prime(k + 1))^2 + (prime(k + 2))^3 + (prime(k + 3))^4 for some k.

%C Generated by starting indices k = 1, 2, 3, 5, 41, 101, 133, 135, 139, 147, 152, 154, 163, 174, 175..

%H Harvey P. Dale, <a href="/A165614/b165614.txt">Table of n, a(n) for n = 1..5000</a>

%t lst={};Do[p=Prime[n+0]^0+Prime[n+1]^1+Prime[n+2]^2+Prime[n+3]^3+Prime[n+4]^4; If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst

%t Select[1+#[[1]]+#[[2]]^2+#[[3]]^3+#[[4]]^4&/@Partition[Prime[Range[350]],4,1],PrimeQ] (* _Harvey P. Dale_, Nov 27 2012 *)

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Sep 22 2009

%E Definition clarified - _R. J. Mathar_, Oct 05 2009