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 A363319 #19 Aug 14 2023 06:53:01
%S A363319 1,1,4,5,9,13,16,25,25,36,41,49,61,64,81,85,100,113,121,144,145,169,
%T A363319 181,196,221,225,256,265,289,313,324,361,365,400,421,441,481,484,529,
%U A363319 545,576,613,625,676,685,729,761,784,841,841,900,925,961,1013,1024
%N A363319 Squares (A000290) and centered squares (A001844) sorted, including duplicates.
%C A363319 This sequence consists of the numbers in A363267 arranged in nondecreasing order, including duplicates, which are given by A008844 = (1, 25, 841, 28561, ...).
%t A363319 c[1] = 1; c[2] = 1;
%t A363319 c[n_] := If[OddQ[n], c[n - 2] + n, 2 c[n - 1] - n + 1]
%t A363319 u = Table[c[n], {n, 1, 120}] (* A363267 *)
%t A363319 s = Sort[u] (* this sequence *)
%Y A363319 Cf. A000290, A001844, A363267, A363282.
%K A363319 nonn,easy
%O A363319 1,3
%A A363319 _Clark Kimberling_, May 27 2023
%E A363319 Incorrect recurrence removed by _Georg Fischer_, Aug 14 2023