cp's OEIS Frontend

A034979 Smallest square starting with a string of n 1's.

%I A034979 #14 Jun 01 2023 03:13:45
%S A034979 1,1156,111556,11115556,111112681,111111555556,11111115555556,
%T A034979 1111111155555556,111111111555555556,11111111115555555556,
%U A034979 111111111113333185156,11111111111122500004921,11111111111115555555555556,111111111111119590793871025,11111111111111115805344390916,11111111111111115805344390916,111111111111111115889741773581604,11111111111111111167337156002376484,11111111111111111115555555555555555556,1111111111111111111155555555555555555556
%N A034979 Smallest square starting with a string of n 1's.
%H A034979 Robert Israel, <a href="/A034979/b034979.txt">Table of n, a(n) for n = 1..498</a>
%F A034979 a(n) <= A102807(n). - _Robert Israel_, May 31 2023
%p A034979 f:= proc(n) local x,k,s;
%p A034979   x:= (10^n-1)/9;
%p A034979   for k from 0 do
%p A034979     s:= ceil(sqrt(10^k*x))^2;
%p A034979     if s < (x+1)*10^k then return s fi
%p A034979   od
%p A034979 end proc:
%p A034979 map(f, [$1..20]); # _Robert Israel_, May 31 2023
%Y A034979 Cf. A034978, A102807.
%K A034979 nonn,base
%O A034979 1,2
%A A034979 _Patrick De Geest_, Nov 15 1998
%E A034979 More terms from Francisco Salinas (franciscodesalinas(AT)hotmail.com), Dec 23 2001