This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A217623 #16 Sep 08 2022 08:46:04 %S A217623 3,17,83,241,509,877,1433,2063,2897,3911,4943,6353,8011,9661,11909, %T A217623 13693,16141,18787,21727,24781,28307,32261,35801,40093,44621,49139, %U A217623 54251,59417,64853,70621,77047,83617,90203,97039,103991,112097,120223,128683,136813,145903 %N A217623 a(n) = prime(prime(n^2)). %H A217623 Vincenzo Librandi, <a href="/A217623/b217623.txt">Table of n, a(n) for n = 1..1000</a> %p A217623 a:= n-> (ithprime@@2)(n^2): %p A217623 seq(a(n), n=1..40); # _Alois P. Heinz_, Mar 17 2021 %t A217623 Table[Prime[Prime[n^2]], {n, 100}] %o A217623 (Magma) [NthPrime(NthPrime(n^2)): n in [1..50]]; %o A217623 (Python) %o A217623 from sympy import prime %o A217623 def a(n): return prime(prime(n**2)) %o A217623 print([a(n) for n in range(1, 41)]) # _Michael S. Branicky_, Mar 17 2021 %o A217623 (PARI) a(n) = prime(prime(n^2)); \\ _Michel Marcus_, Mar 17 2021 %Y A217623 Cf. A000040, A011757. %Y A217623 Subsequence of A006450. %K A217623 nonn,easy %O A217623 1,1 %A A217623 _Vincenzo Librandi_, Oct 13 2012