login
Corresponding values of arithmetic means of digits of numbers from A061383.
1

%I #12 Sep 08 2022 08:46:19

%S 0,1,2,3,4,5,6,7,8,9,1,2,3,4,5,1,2,3,4,5,2,3,4,5,6,2,3,4,5,6,3,4,5,6,

%T 7,3,4,5,6,7,4,5,6,7,8,4,5,6,7,8,5,6,7,8,9,1,2,3,1,2,3,1,2,3,4,2,3,4,

%U 2,3,4,2,3,4,5,3,4,5,3,4,5,3,4,5,6,4,5,6

%N Corresponding values of arithmetic means of digits of numbers from A061383.

%H Jaroslav Krizek, <a href="/A285093/b285093.txt">Table of n, a(n) for n = 0..3000</a>

%F a(n) = A007953(A061383(n)) / A055642(A061383(n)) for n >= 1.

%o (Magma) [&+Intseq(n) / #Intseq(n): n in [1..100000] | &+Intseq(n) mod #Intseq(n) eq 0]

%o (PARI) lista(nn) = {for (n=0, nn, if (n, d = digits(n), d = [0]); if (!( vecsum(d) % #d), print1(vecsum(d)/#d, ", ")););} \\ _Michel Marcus_, Apr 15 2017

%Y Cf. A061383 (numbers with integer arithmetic mean of digits in base 10).

%Y Sequences of numbers n such that a(n) = k for k = 1 - 9: A061384 (k = 1), A061385 (k = 2), A061386 (k = 3), A061387 (k = 4), A061388 (k = 5), A061423 (k = 6), A061424 (k = 7), A061425 (k = 8), A002283 (k = 9).

%Y Cf. A004426, A004427, A257295 (supersequences).

%K nonn,base

%O 0,3

%A _Jaroslav Krizek_, Apr 14 2017