%I #10 Dec 24 2023 11:48:10
%S 2,1,1,0,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,
%T 1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%U 1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
%N Number of comma-children of n in base 3.
%H Michael S. Branicky, <a href="/A367623/b367623.txt">Table of n, a(n) for n = 1..10000</a>
%o (Python)
%o from sympy.ntheory.factor_ import digits
%o def a(k, base=3):
%o m = k + base*(k%base)
%o return len([m+y for y in range(1, base) if digits(m+y, base)[1] == y])
%o print([a(n) for n in range(1, 96)]) # _Michael S. Branicky_, Dec 23 2023
%Y Cf. A121805, A367355, A367356, A367606-A367609, A367622.
%K nonn,base
%O 1,1
%A _N. J. A. Sloane_, Dec 23 2023
|