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 A029704 #16 May 13 2013 01:54:04
%S A029704 82,130,145,170,195,210,219,231,255,274,290,291,322,323,330,370,390,
%T A029704 410,434,435,438,445,455,462,483,505,510,514,530,546,555,570,579,582,
%U A029704 595,610,615,626,627,651,658,663,674,689,690,706,714,715,723,731,754,759,770
%N A029704 Q(sqrt(n)) has class number 4.
%H A029704 Charles R Greathouse IV, <a href="/A029704/b029704.txt">Table of n, a(n) for n = 1..10000</a>
%H A029704 <a href="/index/Qua#quadfield">Index entries for sequences related to quadratic fields</a>
%t A029704 Select[Range[770], SquareFreeQ[#] && NumberFieldClassNumber@Sqrt[#] == 4 &] (* _Arkadiusz Wesolowski_, Oct 18 2012 *)
%o A029704 (PARI) is(n)=if(issquarefree(n), my(c=bnfinit('x^2-n).cyc); c==[4] || c==[2,2], 0) \\ _Charles R Greathouse IV_, Oct 18 2012
%Y A029704 Cf. A003172, A029702-A029703, A029705, A218038-A218042.
%K A029704 nonn
%O A029704 1,1
%A A029704 Paolo Dominici (pl.dm(AT)libero.it)
%E A029704 Initial term added by _Arkadiusz Wesolowski_, Oct 18 2012