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 A197722 #9 Mar 30 2012 18:35:59
%S A197722 1,9,52,8,112,147,586,716,27,100,1154,4157,4688,5239,581,64,22166,
%T A197722 2415,2619,28285,30432,10319,34882,37181,125,41924,44366,46853,15617,
%U A197722 51962,54582,18102,59948,62693,207063,216,71171,74076,77019,800,83019,272192,28197
%N A197722 Smallest number k such that k^2 begins with n^3.
%e A197722 a(6) = 147 because 147^2 = 21609 starts with 216 = 6^3.
%t A197722 f[n_]:=Block[{k = 0, m}, While[m = Max[0, Floor@Log[10, k^2]-Floor@Log[10, n^3]]; (k^2-Mod[k^2, 10^m])/10^m != n^3, k++]; k]; Array[f, 43]
%Y A197722 See A138173 (smallest m such that m^3 begins with n^2).
%K A197722 nonn,base
%O A197722 1,2
%A A197722 _Michel Lagneau_, Oct 17 2011