login

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

a(n) = prime(n)^n + 1.
7

%I #49 Sep 08 2022 08:45:03

%S 3,10,126,2402,161052,4826810,410338674,16983563042,1801152661464,

%T 420707233300202,25408476896404832,6582952005840035282,

%U 925103102315013629322,73885357344138503765450,12063348350820368238715344,3876269050118516845397872322

%N a(n) = prime(n)^n + 1.

%C Sum of the n-th powers of the divisors of the n-th prime. - _Wesley Ivan Hurt_, Jan 17 2016

%D D. M. Burton, Elementary Number Theory, Allyn and Bacon, Inc. Boston, MA, 1976, pp. 56.

%H Harry J. Smith, <a href="/A062006/b062006.txt">Table of n, a(n) for n = 1..100</a>

%F a(n) = prime(n)^n + 1.

%p A062006:=n->ithprime(n)^n+1: seq(A062006(n), n=1..20); # _Wesley Ivan Hurt_, Jan 18 2016

%t Table[Prime[n]^n + 1, {n, 20}] (* _Harvey P. Dale_, Dec 23 2013 *)

%o (PARI) for(n=1,22,print1(prime(n)^n+1, ", "))

%o (PARI) for (n=1, 100, a=2, a=prime(n)^n + 1; write("b062006.txt", n, " ", a) ) \\ _Harry J. Smith_, Jul 29 2009

%o (Magma) [NthPrime(n)^n+1 : n in [1..20]]; // _Vincenzo Librandi_, Jun 24 2015

%Y Equals A062457(n) + 1.

%K easy,nonn

%O 1,1

%A _Jason Earls_, Jun 27 2001