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 A069711 #11 Jul 01 2018 03:57:56
%S A069711 0,1,4,9,64,144,225,324,441,576,729,900,1681,3364,3481,4624,7225,9025,
%T A069711 12769,14884,21025,23104,24649,24964,27556,30976,32041,33856,36100,
%U A069711 37249,37636,44944,48841,56644,63001,65536,66049,70756,75076,75625,80089,80656,85264
%N A069711 Squares whose arithmetic mean of digits is an integer (i.e., the sum of digits is a multiple of the number of digits).
%H A069711 Jon E. Schoenfield, <a href="/A069711/b069711.txt">Table of n, a(n) for n = 1..10000</a>
%t A069711 Do[ If[ IntegerQ[ Apply[ Plus, IntegerDigits[n^2]] / Floor[ Log[10, n^2] + 1]], Print[n^2]], {n, 1, 10^3}]
%Y A069711 Cf. A069709, A069710, A069712.
%K A069711 base,nonn
%O A069711 1,3
%A A069711 _Amarnath Murthy_, Apr 08 2002
%E A069711 Edited and extended by _Robert G. Wilson v_, Apr 12 2002
%E A069711 0 prepended as a(1) and a(27)-a(43) from _Jon E. Schoenfield_, Jun 28 2018