A104131 a(n) = pip(n)^pip(n) where pip(n) is the n-th prime-indexed prime (see A006450).

27, 3125, 285311670611, 827240261886336764177, 17069174130723235958610643029059314756044734431, 1330877630632711998713399240963346255985889330161650994325137953641

Offset

1,1

Links

Table of n, a(n) for n=1..6.

Mathematica

#^#&/@Prime[Prime[Range[7]]] (* Harvey P. Dale, Jun 03 2023 *)

Prog

(PARI) piptopip(n) = { local(x, y); for(x=1, n, y=pip(x)^pip(x); print1(y", "); ) } pip() = { return(prime(prime(n))) }

Crossrefs

Sequence in context: A350135 A085529 A132659 * A132645 A223551 A178631

Adjacent sequences: A104128 A104129 A104130 * A104132 A104133 A104134

Keyword

easy,nonn

Author

Cino Hilliard, Mar 06 2005

Status

approved