%I A067456
%S A067456 1,2,3,4,5,6,7,8,9,1,1,2,3,4,5,6,7,8,9,2,2,2,3,4,5,6,7,8,9,3,3,3,4,5,5,
%T A067456 6,7,8,9,4,4,4,5,5,6,7,8,8,9,5,5,5,5,6,7,7,8,9,10,6,6,6,6,7,7,8,9,10,
%U A067456 10,7,7,7,7,8,8,9,9,10,11,8,8,8,8,8,9,10,10,11,12,9,9,9,9,9,10,10,11
%N A067456 Floor( sqrt( sum of the decimal digits of n squared)).
%C A067456 Program and terms from Robert G. Wilson.
%F A067456 Floor(Sqrt(A003132)).
%p A067456 Table[Floor[Sqrt[Apply[Plus, IntegerDigits[n]^2]]], {n, 1, 100}]
%Y A067456 Sequence in context: A065881 A133048 A054055 this_sequence A052429 A051802 
               A051801
%Y A067456 Adjacent sequences: A067453 A067454 A067455 this_sequence A067457 A067458 
               A067459
%K A067456 base,easy,nonn
%O A067456 0,2
%A A067456 Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 05 2002