%I #11 May 31 2023 14:54:58
%S 1,5,15,149,4714,47141,471405,1490712,1490712,471404521,1490711985,
%T 1490711985,1490711985,1490711985,47140452079103,149071198499986,
%U 149071198499986,14907119849998598,14907119849998598,471404520791031683,14907119849998597976,471404520791031682934,4714045207910316829339
%N a(n)^2 is smallest positive square starting with a string of n 2's.
%H Robert Israel, <a href="/A034980/b034980.txt">Table of n, a(n) for n = 0..996</a>
%e a(5)^2 = 47141^2 = {22222}73881.
%p f:= proc(n) local x, k, s;
%p x:= 2*(10^n-1)/9;
%p for k from 0 do
%p s:= ceil(sqrt(10^k*x));
%p if s^2 < (x+1)*10^k then return s fi
%p od
%p end proc:
%p f(0):= 1:
%p map(f, [$0..30]); # _Robert Israel_, May 31 2023
%Y Cf. A034981.
%K nonn,base
%O 0,2
%A _Patrick De Geest_, Nov 15 1998
%E More terms from Francisco Salinas (franciscodesalinas(AT)hotmail.com), Dec 23 2001
|