|
|
A055961
|
|
a(n) = n - (reversal of base-11 digits of n) (written in base 10).
|
|
1
|
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10, 0, -10, -20, -30, -40, -50, -60, -70, -80, -90, 20, 10, 0, -10, -20, -30, -40, -50, -60, -70, -80, 30, 20, 10, 0, -10, -20, -30, -40, -50, -60, -70, 40, 30, 20, 10, 0, -10, -20, -30, -40, -50, -60, 50, 40, 30, 20, 10, 0, -10, -20, -30, -40, -50, 60, 50, 40, 30, 20, 10, 0, -10, -20, -30, -40
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,12
|
|
COMMENTS
|
a(n) is a multiple of 10.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
f:= proc(n) local L, t;
L:= convert(n, base, 11);
n - add(L[-i]*11^(i-1), i=1..nops(L))
end proc:
|
|
MATHEMATICA
|
Table[n-FromDigits[Reverse[IntegerDigits[n, 11]], 11], {n, 0, 80}] (* Harvey P. Dale, Feb 21 2023 *)
|
|
PROG
|
(PARI) a(n) = n - fromdigits(Vecrev(digits(n, 11)), 11); \\ Michel Marcus, Apr 22 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|