OFFSET
1,1
COMMENTS
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
CROSSREFS
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