A112988 - OEIS

%I #6 Feb 27 2013 19:41:17

%S 2,5,9,12,19,23,30,34,41,52,55,65,73,77,85,95,105,110,121,128,133,143,

%T 151,162,175,182,187,195,200,208,231,239,249,253,271,276,286,298,306,

%U 318,328,332,350,354,362,366,387,408,416,420,427,439,443,461,472,483

%N Position of n-th prime in A089088.

%C A089088(a(n)) = A000040(n).

%H Reinhard Zumkeller, <a href="/A112988/b112988.txt">Table of n, a(n) for n = 1..1000</a>

%o (Haskell)

%o import Data.List (elemIndex)

%o import Data.Maybe (fromJust)

%o a112988 = (+ 1) . fromJust . (`elemIndex` a089088_list) . a000040

%o -- _Reinhard Zumkeller_, Feb 27 2013

%Y Cf. A112976.

%K nonn

%O 1,1

%A _Reinhard Zumkeller_, Oct 08 2005