A229218 Position (or inverse of) n in A228407.

0, 2, 6, 10, 17, 34, 45, 65, 81, 118, 3, 1, 5, 11, 18, 33, 46, 64, 80, 117, 7, 26, 9, 41, 23, 35, 44, 66, 82, 119, 14, 12, 42, 16, 54, 38, 51, 69, 85, 122, 21, 19, 24, 55, 145, 152, 197, 230, 271, 362, 179, 155, 36, 39, 153, 146, 185, 533

Offset

0,2

Links

Table of n, a(n) for n=0..57.

Example

a(0) = 0 since A228407(0) is 0;
a(1) = 2 since A228407(2) is 1;
a(2) = 6 since A228407(6) is 2;
a(11) = 1 since A228407(1) is 11; etc.

Mathematica

(* do A228407 first, then *) lst = Array[a, 500, 0]; Flatten[ Table[ Position[lst, n], {n, 0, 57}] - 1]

Crossrefs

Cf. A228407

Sequence in context: A238377 A180739 A274679 * A255174 A140777 A309502

Adjacent sequences: A229215 A229216 A229217 * A229219 A229220 A229221

Keyword

nonn

Author

Robert G. Wilson v, Nov 10 2013

Status

approved