%I #22 Mar 01 2022 11:21:28
%S 3,13,47,107,257,397,653,881,1279,1889,2293,3119,3847,4423,5323,6563,
%T 7937,8819,10391,11833,12889,14831,16477,18713,21599,23603,25189,
%U 27409,29063,31511,37159,39869,43321,45589,50923,53281,57271,61561,65173,69821,74383
%N a(n) = prime(n*prime(n)).
%F a(n) = A000040(A033286(n)).
%e For n = 2, prime(2*prime(2)) = prime(2*3) = prime(6) = 13, so a(2) = 13.
%t Table[Prime[n*Prime[n]], {n, 100}] (* _T. D. Noe_, Oct 22 2013 *)
%o (PARI) a(n) = prime(n*prime(n)); \\ _Michel Marcus_, Oct 22 2013
%Y Cf. A000040, A006450, A033286, A036689, A080697, A217622, A230098, A230325, A230285, A230460.
%K nonn
%O 1,1
%A _Omar E. Pol_, Oct 20 2013