|
%I #5 Apr 30 2017 14:54:14
%S 1861,2521,3449,9601,21481,23003,25229,26099,32173,33391,33923,39089,
%T 40801,41221,44257,47279,48809,55889,57781,67021,70111,74279,74699,
%U 74707,75133,75149,82963,84307,87853,88397,88651,103787,103889
%N Third term of strong prime sextets: p(m-1)-p(m-2) > p(m)-p(m-1) > p(m+1)-p(m) > p(m+2)-p(m+1) > p(m+3)-p(m+2).
%H Harvey P. Dale, <a href="/A054815/b054815.txt">Table of n, a(n) for n = 0..2500</a>
%t Select[Partition[Prime[Range[10000]],6,1],Max[Differences[#,2]]<0&] [[All,3]] (* _Harvey P. Dale_, Apr 30 2017 *)
%Y Cf. A051634, A054800-A054840.
%K nonn
%O 0,1
%A _Henry Bottomley_, Apr 10 2000
|
