|
| |
|
|
A030108
|
|
Base 9 reversal of n (written in base 10).
|
|
21
| |
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 1, 10, 19, 28, 37, 46, 55, 64, 73, 2, 11, 20, 29, 38, 47, 56, 65, 74, 3, 12, 21, 30, 39, 48, 57, 66, 75, 4, 13, 22, 31, 40, 49, 58, 67, 76, 5, 14, 23, 32, 41, 50, 59, 68, 77, 6, 15, 24, 33, 42, 51, 60, 69, 78, 7, 16, 25, 34, 43, 52, 61, 70, 79, 8, 17, 26, 35, 44
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
PROG
| a(n, b=9)=subst(Polrev(base(n, b)), x, b)) /* where */
base(n, b)={my(a=[n%b]); while(0<n\=b, a=concat(n%b, a)); a} \\ - M. F. Hasler, Nov 04 2011
|
|
|
CROSSREFS
| Cf. A030101 - A030107, A004086.
Sequence in context: A033929 A025482 A023125 * A037904 A070615 A040114
Adjacent sequences: A030105 A030106 A030107 * A030109 A030110 A030111
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
