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 A361150 #23 Aug 10 2023 07:16:05 %S A361150 1,17,137,611,1839,4405,9101,16859,28987,46663,71797,105863,151259, %T A361150 209895,284777,378661,493863,634985,804801,1007439,1245345,1526369, %U A361150 1851971,2227153,2658287,3151447,3711837,4343483,5053859,5849959,6739255,7727399,8825137,10034745 %N A361150 a(n) = A014284(n^2) + A014284(n^2-1). %F A361150 a(n) = 2*A014284(n^2-1) + A008578(n^2). - _Michel Marcus_, Aug 10 2023 %t A361150 nn = 34; s = Accumulate[{1}~Join~Prime@ Range[nn^2]]; {1}~Join~Array[Total@ s[[# - 1 ;; #]] &[#^2] &, nn - 1, 2] (* _Michael De Vlieger_, Aug 10 2023 *) %o A361150 (PARI) f(n) = if (n, 1 + vecsum(primes(n-1)), 0); \\ A014284 %o A361150 a(n) = f(n^2) + f(n^2-1); \\ _Michel Marcus_, Aug 10 2023 %Y A361150 Cf. A008578, A014284. %K A361150 nonn %O A361150 1,2 %A A361150 _N. J. A. Sloane_, Mar 02 2023