OFFSET
1,3
COMMENTS
Whenever a(n) is a multiple of 8, then a(n+1) = a(n) + 1 is also a base 8 perfect digital invariant, with the same exponent k. - M. F. Hasler, Nov 21 2019
LINKS
Joseph Myers, Table of n, a(n) for n=1..1130 (complete to 160 base 8 digits)
PROG
(PARI) select( is_A162231(n, b=8)={n<b||forstep(k=logint(n, max(vecmax(b=digits(n, b)), 2)), 2, -1, my(t=vecsum([d^k|d<-b])); t>n|| return(t==n))}, [0..10^5]) \\ M. F. Hasler, Nov 21 2019
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Joseph Myers, Jun 28 2009
STATUS
approved