login
Floor( sqrt( sum of the decimal digits of n squared)).
0

%I #13 Dec 16 2023 23:55:04

%S 0,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,

%T 5,5,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,

%U 10,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 Floor( sqrt( sum of the decimal digits of n squared)).

%C Terms from _Robert G. Wilson v_.

%F a(n) = floor(sqrt(A003132)).

%t Table[Floor[Sqrt[Apply[Plus, IntegerDigits[n]^2]]], {n, 0, 100}] (* _Robert G. Wilson v_ *)

%K base,easy,nonn

%O 0,3

%A _Amarnath Murthy_, Feb 05 2002

%E a(0)=0 inserted by _Sean A. Irvine_, Dec 16 2023