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 A034978 #11 May 31 2023 11:21:24 %S A034978 1,34,334,3334,10541,333334,3333334,33333334,333333334,3333333334, %T A034978 10540925534,105409255339,3333333333334,10540925533895, %U A034978 105409255338946,105409255338946,10540925533894598,105409255338945978,3333333333333333334,33333333333333333334,333333333333333333334,1054092553389459777333 %N A034978 a(n)^2 is smallest square starting with a string of n 1's. %H A034978 Robert Israel, <a href="/A034978/b034978.txt">Table of n, a(n) for n = 1..996</a> %F A034978 a(n) <= A093137(n). - _Robert Israel_, May 31 2023 %e A034978 a(5)^2 = 10541^2 = {11111}2681. %p A034978 f:= proc(n) local x, k, s; %p A034978 x:= (10^n-1)/9; %p A034978 for k from 0 do %p A034978 s:= ceil(sqrt(10^k*x)); %p A034978 if s^2 < (x+1)*10^k then return s fi %p A034978 od %p A034978 end proc: %p A034978 map(f, [$1..20]); # _Robert Israel_, May 31 2023 %Y A034978 Cf. A034979, A093137. %K A034978 nonn,base %O A034978 1,2 %A A034978 _Patrick De Geest_, Nov 15 1998 %E A034978 More terms from Francisco Salinas (franciscodesalinas(AT)hotmail.com), Dec 23 2001