cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A317743 Valleys in A064800: terms which are smaller than their neighbors.

This page as a plain text file.
%I A317743 #29 Sep 23 2018 01:59:15
%S A317743 14,18,20,27,30,32,35,38,42,44,51,54,57,59,62,67,68,72,74,80,87,90,93,
%T A317743 98,102,104,110,114,123,128,131,132,135,138,140,143,147,150,152,158,
%U A317743 163,164,171,174,179,182,187,192,194,198,200
%N A317743 Valleys in A064800: terms which are smaller than their neighbors.
%C A317743 From _Zak Seidov_, Sep 21 2018: (Start)
%C A317743 First second-order valley is a(514) = 516
%C A317743 with {521, 517, 516, 517, 520}.
%C A317743 First third-order valley is a(k=265827) = 265829
%C A317743 with {265833, 265831, 265830, 265829, 265831, 265832, 265834}.
%C A317743 Are there minima of higher order? (End)
%e A317743 a(1) = 14 is the first valley (local minimum) in A064800 as A064800(13) = 14 is less than A064800(12) = 15 and A064800(14) = 16.
%t A317743 Transpose[ Select[ Partition[(# + PrimeOmega[#]) & /@ Range[201], 3, 1], #[[1]] > #[[2]] < #[[3]] &]][[2]] (* _Giovanni Resta_, Aug 09 2018 *)
%o A317743 (PARI) lista(nn) = {my(v = vector(nn, n, n + bigomega(n))); for (n=2, nn, if ((v[n] < v[n-1]) && (v[n] < v[n+1]), print1(v[n], ", ")););} \\ _Michel Marcus_, Sep 07 2018
%Y A317743 Cf. A064800, A319504.
%K A317743 nonn
%O A317743 1,1
%A A317743 _Zak Seidov_, Aug 05 2018