A164774 - OEIS

%I #8 Apr 11 2023 21:03:11

%S 8,113,122,157,158,166,176,184,193,194,212,221,238,256,257,266,274,

%T 275,283,284,292,311,3283,3314,3386,3391,3413,3458,3463,3517,3544,

%U 3562,3593,3674,3683,3697,3724,3733,3737,3764,3814,3827,3836,3859,3863,3872,3917

%N Numbers n with property that average digit of n^2 is s=5.

%e 8^2=64 and (6+4)/2=5

%e 113^2=12769 and (1+2+7+6+9)/5=5.

%o (PARI) dsum(n)={my(s=0);while(n>9,s+=n%10;n\=10);s+n};

%o for(n=1,1e6,if(dsum(n^2)/#Str(n^2)==5,print1(n","))) \\ _Charles R Greathouse IV_, Nov 01 2009

%Y Subsequence of A164817.

%Y Average of digits of n^2 = s: A164771 (s=1), A164770 (s=2), A164782 (s=3), A164776 (s=4), A164774 (s=5), A164778 (s=6), A164773 (s=7), A164772 (s=8).

%K nonn,base

%O 1,1

%A _Zak Seidov_, Aug 26 2009