|
|
|
|
7, 4, 1, 8, 5, 2, 9, 6, 3, 70, 37, 104, 71, 38, 105, 72, 39, 106, 73, 40, 107, 74, 41, 108, 75, 42, 109, 76, 43, 10, 77, 44, 11, 78, 45, 12, 79, 46, 13, 80, 47, 14, 81, 48, 15, 82, 49, 16, 83, 50, 17, 84, 51, 18, 85, 52, 19, 86, 53, 20, 87, 54, 21, 88, 55
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Permutation of the positive integers, inverse: A258226.
|
|
LINKS
|
|
|
PROG
|
(Haskell)
a258225 = flip div 3 . a258083
(PARI) lista(nn) = {v = []; vs = vecsort(v); for (n=1, nn, k=3; pt = 10^(#digits(n)); while (! (((k % pt) == n) && !vecsearch(vs, k)), k+=3); v = concat(v, k); vs = vecsort(v); print1(k/3, ", "); ); } \\ Michel Marcus, Jun 26 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|