OFFSET
1,3
COMMENTS
Whenever a(n) is a multiple of 6, then a(n+1) = a(n) + 1 is also a base-6 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..764 (complete to 350 base-6 digits)
PROG
(PARI) select( {is_A162225(n, b=6)=if(n<b, 1, my(t=vecmax(b=digits(n, b))); t>1 && forstep(p=logint(n, t), logint(n, vecsum(b)), -1, (t=vecsum([d^p|d<-b]))>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