A144936 - OEIS

A144936

Primes of form p = (n^1)-1+(n^2)-2+(n^3)-3+(n^4)-4+(n^5)-5+(n^6)-6+(n^7)-7.

%I #6 Jun 08 2022 18:43:05

%S 3251,5380811,21435859,3559590211,43950269291,1197301738651,

%T 4978825201387,7555858447451,44733963701131,108285670562779,

%U 302711489293211,912484779174091,2585353346765411,4300509998893139

%N Primes of form p = (n^1)-1+(n^2)-2+(n^3)-3+(n^4)-4+(n^5)-5+(n^6)-6+(n^7)-7.

%H Harvey P. Dale, <a href="/A144936/b144936.txt">Table of n, a(n) for n = 1..1000</a>

%t lst={};Do[p=(n^1)-1+(n^2)-2+(n^3)-3+(n^4)-4+(n^5)-5+(n^6)-6+(n^7)-7;If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst

%t Select[Table[Total[n^Range[7]]-28,{n,200}],PrimeQ] (* _Harvey P. Dale_, Jun 08 2022 *)

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Sep 25 2008