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 A323526 #16 Feb 15 2019 03:05:53 %S A323526 1,2,7,23,53,97,151,227,311,419,541,661,827,1009,1193,1427,1619,1879, %T A323526 2143,2437,2741,3083,3461,3803,4211,4637,5051,5519,6007,6481,6997, %U A323526 7573,8161,8737,9341,9931,10627,11321,12049,12743,13499,14327,15101,15877,16747,17609 %N A323526 One and prime numbers whose prime index is a perfect square. %F A323526 a(n) = A011757(n-1) for n > 1. - _Alois P. Heinz_, Jan 17 2019 %t A323526 Array[Prime[#^2]&,20] %o A323526 (PARI) vector(50, n, if (n==1, 1, prime((n-1)^2))) \\ _Michel Marcus_, Feb 15 2019 %Y A323526 Cf. A000290, A000720, A001248, A011757, A026478, A056239, A323520, A323521, A323525, A323527, A323528. %K A323526 nonn %O A323526 1,2 %A A323526 _Gus Wiseman_, Jan 17 2019