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 A066566 #24 Dec 05 2024 18:57:57
%S A066566 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,40,41,42,43,44,45,
%T A066566 46,47,48,49,90,91,92,93,94,95,96,97,98,99,150,151,152,153,154,155,
%U A066566 156,157,158,159,230,231,232,233,234,235,236,237,238,239,330,331,332,333
%N A066566 Numbers that when decremented by the sum of their digits produce a square.
%C A066566 The squares in this sequence are divisible by 9.
%H A066566 Indranil Ghosh, <a href="/A066566/b066566.txt">Table of n, a(n) for n = 1..11130</a> (terms 1..1000 from Harry J. Smith)
%e A066566 155 is a member as 155 - 1 - 5 - 5 = 144 = 12^2.
%t A066566 Select[Range[0,350],IntegerQ[Sqrt[#-Total[IntegerDigits[#]]]]&] (* _Harvey P. Dale_, Feb 24 2011 *)
%o A066566 (PARI) isok(k)={issquare(k-sumdigits(k))}
%Y A066566 Cf. A066564.
%K A066566 base,nonn
%O A066566 1,3
%A A066566 _Amarnath Murthy_, Dec 18 2001
%E A066566 More terms from _Jason Earls_, Dec 20 2001
%E A066566 Offset changed from 0 to 1 by _Harry J. Smith_, Mar 05 2010