login
A249279
Inverse permutation of A249278 (such that first digit of a(n+1) has parity of a(n)).
4
0, 7, 1, 8, 2, 9, 3, 10, 4, 11, 12, 15, 16, 19, 20, 23, 24, 27, 28, 31, 5, 6, 13, 14, 17, 18, 21, 22, 25, 26, 32, 35, 36, 39, 40, 43, 44, 47, 48, 51, 29, 30, 33, 34, 37, 38, 41, 42, 45, 46, 52, 55, 56, 59, 60, 63, 64, 67, 68, 71, 49, 50, 53, 54, 57, 58, 61, 62, 65, 66, 72, 75, 76
OFFSET
0,2
PROG
(PARI) N=100; vector(N, n, t=0; for(i=1, #A249278, A249278[i]==n-1&&(t=i)&&break); t-1)
(Haskell)
import Data.List (elemIndex); import Data.Maybe (fromJust)
a249279 = fromJust . (`elemIndex` a249278_list)
-- Reinhard Zumkeller, Oct 27 2014
CROSSREFS
Sequence in context: A021937 A021586 A091131 * A145963 A199439 A153625
KEYWORD
nonn
AUTHOR
M. F. Hasler, Oct 24 2014
STATUS
approved