login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A256307
Apply the transformation 0 -> 1 -> 2 -> 3 -> 4 -> 5 -> 6 -> 0 to the digits of n written in base 7; do not convert back to base 10.
3
1, 2, 3, 4, 5, 6, 0, 21, 22, 23, 24, 25, 26, 20, 31, 32, 33, 34, 35, 36, 30, 41, 42, 43, 44, 45, 46, 40, 51, 52, 53, 54, 55, 56, 50, 61, 62, 63, 64, 65, 66, 60, 1, 2, 3, 4, 5, 6, 0, 211, 212, 213, 214, 215, 216, 210, 221, 222, 223, 224
OFFSET
0,2
COMMENTS
Base 7 variant of A256078 (base 2) and A048379 (base 10). See A256303 - A256308 for bases 3 through 8, A256289 for base 9, and A256297 for the variant where the result is converted back to base 10.
EXAMPLE
a(7) = 21 because 7 = "10" (in base 7) becomes "21".
a(48) = 0 because 48 = "66" (in base 7) becomes "00".
MATHEMATICA
Table[FromDigits[IntegerDigits[n, 7]/.{0->1, 1->2, 2->3, 3->4, 4->5, 5->6, 6->0}], {n, 0, 60}] (* Harvey P. Dale, Oct 09 2023 *)
PROG
(PARI) A256307(n, b=7)=!n+eval(Strchr(apply(d->(d+1)%b+48, digits(n, b))))
CROSSREFS
Sequence in context: A004182 A265520 A256297 * A030998 A346691 A255827
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Mar 22 2015
STATUS
approved