login
A258225
a(n) = A258083(n) / 3.
6
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
OFFSET
1,1
COMMENTS
Permutation of the positive integers, inverse: A258226.
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
Reinhard Zumkeller, May 27 2015
STATUS
approved