cp's OEIS Frontend

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.

A361150 a(n) = A014284(n^2) + A014284(n^2-1).

This page as a plain text file.
%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