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

Author

Cino Hilliard, Mar 06 2005

Keywords

• easy
• nonn

Programs

Mathematica

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

PARI

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