STATUS
reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
Amiram Eldar, <a href="/A354885/b354885.txt">Table of n, a(n) for n = 1..10000</a>
approved
editing
proposed
approved
editing
proposed
(PARI) is(n) = {my (t=digits(n, 3)); if (t==Vecrev(t), my (b=[], d); while (n, b=concat(b, d=[0, 1, -1][1+n%3], b); n=(n-d)/3); b==Vecrev(b), 0)} \\ Rémy Sigrist, Jun 10 2022
(PARI) is(n) = {my (t=digits(n, 3)); if (t==Vecrev(t), my (b=[], d); while (n, b=concat(b, d=[0, 1, -1][1+n%3]); n=(n-d)/3); b==Vecrev(b), 0)} \\ Rémy Sigrist, Jun 10 2022
proposed
editing
editing
proposed