A088366 - OEIS

A088366

a(n) = index of the n-th local maximum of A053707.

2, 5, 8, 11, 15, 18, 20, 25, 27, 29, 31, 36, 38, 42, 45, 49, 51, 54, 58, 62, 64, 67, 69, 71, 74, 76, 79, 81, 84, 89, 92, 95, 97, 99, 104, 106, 111, 113, 117, 122, 126, 130, 133, 135, 137, 140, 143, 145, 147, 149, 151, 154, 157, 159, 162, 167, 170, 172, 175, 179, 181

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

A053707(a(n)) = A088365(n).

LINKS

Table of n, a(n) for n=1..61.

EXAMPLE

The fourth local maximum of A053707 is 40 and occurs at index 11, hence a(4) = 11; A053707(a(4)) = A053707(11) = 40 = A088365(4).

PROG

(PARI) {m=1; k=0; for(n=2, 500000, if(matsize(factor(n))[1]==1&&factor(n)[1, 2]>1, d=n-m; if((k<2||b<c)&&(!k<1&&d<=c), print1(k, ", ")); k++; m=n; b=c; c=d))}

CROSSREFS

Cf. A025475, A053707, A088365.

Sequence in context: A295624 A284882 A190364 * A257984 A186228 A184747

Adjacent sequences: A088363 A088364 A088365 * A088367 A088368 A088369

KEYWORD

nonn

AUTHOR

Klaus Brockhaus, Sep 27 2003

STATUS

approved