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 A227863 #44 Jul 13 2025 13:20:07 %S A227863 1,49,121,169,241,289,361,409,481,529,601,649,721,769,841,889,961, %T A227863 1009,1081,1129,1201,1249,1321,1369,1441,1489,1561,1609,1681,1729, %U A227863 1801,1849,1921,1969,2041,2089,2161,2209,2281,2329,2401,2449,2521,2569,2641,2689 %N A227863 Numbers congruent to {1,49} mod 120. %C A227863 The squares of natural numbers not divisible by 2, 3 or 5 and therefore the squares of prime numbers >5 are confined to this sequence. %H A227863 Bruno Berselli, <a href="/A227863/b227863.txt">Table of n, a(n) for n = 1..1000</a> %H A227863 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,-1). %F A227863 G.f.: x*(1 + 48*x + 71*x^2)/((1 + x)*(1 - x)^2). [_Bruno Berselli_, Nov 04 2013] %F A227863 a(n) = 60*n - 6*(-1)^n - 65. [_Bruno Berselli_, Nov 04 2013] %F A227863 E.g.f.: 71 + (60*x - 65)*exp(x) - 6*exp(-x). - _David Lovler_, Sep 10 2022 %t A227863 Table[60 n - 6 (-1)^n - 65, {n, 50}] (* _Bruno Berselli_, Nov 04 2013 *) %t A227863 LinearRecurrence[{1,1,-1},{1,49,121},50] (* or *) #+{1,49}&/@(120*Range[0,30])//Flatten (* _Harvey P. Dale_, Jul 13 2025 *) %o A227863 (PARI) a(n)=n\2*120+[-71,1][n%2+1] \\ _Charles R Greathouse IV_, Aug 26 2014 %Y A227863 Cf. A000040, A001248, A007775. %K A227863 nonn,easy %O A227863 1,2 %A A227863 _Gary Croft_, Nov 01 2013