A172191 - OEIS

%I #17 Apr 28 2022 07:47:44

%S 32,162,1250,4802,29282,57122,167042,260642,559682,1414562,1847042,

%T 3748322,5651522,6837602,9759362,15780962,24234722,27691682,40302242,

%U 50823362,56796482,77900162,94916642,125484482,177058562,208120802

%N a(n) = 2*prime(n)^4.

%H Vincenzo Librandi, <a href="/A172191/b172191.txt">Table of n, a(n) for n = 1..1000</a>

%F a(n) = 2*A030514(n).

%t 2Prime[Range[100]]^4 (* _Vincenzo Librandi_, Mar 27 2014 *)

%o (Magma) [2*p^4: p in PrimesUpTo(200)]; // _Vincenzo Librandi_, Mar 27 2014

%o (SageMath) [2*nth_prime(n)^4 for n in (1..50)] # _G. C. Greubel_, Apr 28 2022

%Y Cf. A000040, A030514.

%K nonn,easy

%O 1,1

%A _Vincenzo Librandi_, Jan 29 2010

%E Definition clarified by _Jon E. Schoenfield_, Jun 18 2010