This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A196175 Positions of local minima in A001223. 4
 5, 7, 10, 13, 17, 20, 22, 26, 28, 31, 33, 35, 38, 41, 43, 45, 49, 52, 57, 60, 64, 67, 69, 75, 78, 81, 83, 85, 89, 93, 95, 98, 100, 104, 109, 113, 116, 120, 122, 126, 131, 134, 136, 138, 140, 142, 144, 148, 152, 155, 159, 163, 167, 169 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS Or, numbers n such that A001223(n-1)>A001223(n) A001223(38). MATHEMATICA nn = 1001; t = Differences[Prime[Range[nn]]]; t2 = {}; Do[If[t[[n - 1]] > t[[n]] && t[[n]] < t[[n + 1]], AppendTo[t2, {n, t[[n]]}]], {n, 2, nn - 2}]; Transpose[t2][[1]] (* T. D. Noe, Dec 27 2011 *) PROG (Haskell) a196175 n = a196175_list !! (n-1) a196175_list = map (+ 2) \$ elemIndices True \$    zipWith (\x y -> x < 0 && y > 0) a036263_list \$ tail a036263_list -- Reinhard Zumkeller, Oct 29 2011 CROSSREFS Cf. A001223 (differences between consecutive primes). Cf. A036263 (second differences of primes). Sequence in context: A060873 A186542 A287444 * A112251 A089061 A093115 Adjacent sequences:  A196172 A196173 A196174 * A196176 A196177 A196178 KEYWORD nonn AUTHOR Zak Seidov, Oct 27 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 21 01:15 EST 2019. Contains 320364 sequences. (Running on oeis4.)