OFFSET
0,2
COMMENTS
EXAMPLE
a(8) = 21 because 8 = "10" in base 8 becomes "21".
a(63) = 0 because 63 = "77" in base 8 becomes "00".
MATHEMATICA
Table[FromDigits[IntegerDigits[n, 8]/.{0->1, 1->2, 2->3, 3->4, 4->5, 5->6, 6->7, 7->0}], {n, 0, 60}] (* Harvey P. Dale, Mar 29 2015 *)
PROG
(PARI) A256308(n, b=8)=!n+eval(Strchr(apply(d->(d+1)%b+48, digits(n, b))))
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Mar 22 2015
EXTENSIONS
Examples corrected by Harvey P. Dale, Mar 29 2015
STATUS
approved