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.

A229081 Numbers n such that there exists a square m^2 with 3n^2 - n <= m^2 <= 3n^2 + n.

This page as a plain text file.
%I A229081 #17 Sep 08 2022 08:46:05
%S A229081 1,3,4,7,8,11,12,14,15,16,18,19,22,23,26,27,29,30,33,34,37,38,40,41,
%T A229081 42,44,45,48,49,52,53,55,56,57,59,60,63,64,67,68,70,71,74,75,78,79,82,
%U A229081 83,85,86,89,90,93,94,96,97,98,100,101,104,105,108,109,111,112,113,115,116,119,120,123,124,126
%N A229081 Numbers n such that there exists a square m^2 with 3n^2 - n <= m^2 <= 3n^2 + n.
%H A229081 Robert Israel, <a href="/A229081/b229081.txt">Table of n, a(n) for n = 1..10000</a>
%e A229081 There is a square between 3*4^2-4 and 3*4^2+4 (44<=49<=52) but not between 3*5^2-5=70 and 3*5^2+5=80, so 4 is in sequence but not 5.
%p A229081 filter:= n -> ceil(sqrt(3*n^2-n))<=floor(sqrt(3*n^2+n)):
%p A229081 select(filter, [$1..200]); # _Robert Israel_, Jan 05 2020
%o A229081 (PARI) for(n=1,200,for(i=-n,n,f=0;if(issquare(3*n*n+i),f=1;break));if(f,print1(n,",")))
%o A229081 (Magma) [n: n in [1..130] | exists{3*n^2+i: i in [-n..n] | IsSquare(3*n^2+i)}]; // _Bruno Berselli_, Sep 13 2013
%Y A229081 Cf. A006451, A072221.
%K A229081 nonn
%O A229081 1,2
%A A229081 _Ralf Stephan_, Sep 13 2013