login
A144801
Integers having ideal digital mean up to base 6.
5
36990, 37230, 38670, 43350, 45390, 14492490, 14496810, 14512170, 14578050, 14579970, 14630970, 14655810, 14663730, 14685690, 14733810, 14741790, 14753010, 14758350, 14761350, 14779230, 14779710, 14780310, 14784090, 14801490, 14807190, 14807430, 14818650
OFFSET
1,1
COMMENTS
Subset of A031443, A144798, A144799 and A144800.
These numbers have digital mean dm(b, n) = (Sum_{i=1..d} 2*d_i - (b-1)) / (2*d) = 0, where d is the number of digits in the base b representation of n and d_i the individual digits, for 2 <= b <= 6.
LINKS
Jason Yuen, Table of n, a(n) for n = 1..10000 (first 793 terms from Pontus von Brömssen)
PROG
(PARI) is(k, b) = my(d=digits(k, b)); vecsum(d)/#d == (b-1)/2;
isok(k) = is(k, 2) && is(k, 3) && is(k, 4) && is(k, 5) && is(k, 6); \\ Michel Marcus, Aug 03 2023
KEYWORD
base,nonn
AUTHOR
Reikku Kulon, Sep 21 2008
EXTENSIONS
Accidentally omitted terms added by Reikku Kulon, Sep 24 2008
a(24)-a(27) from Pontus von Brömssen, Aug 02 2023
STATUS
approved