The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A160919 Averages of twin prime pairs that are sums of 5 consecutive averages of twin prime pairs. 0
 108, 570, 858, 1452, 3330, 6792, 7458, 9420, 9630, 10710, 10890, 13722, 17388, 18120, 25032, 27582, 27792, 34032, 68712, 68898, 72270, 76830, 78978, 81372, 89820, 90402, 95232, 99708, 104472, 119772, 122868, 125790, 138078, 165312 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..34. EXAMPLE Averages of twin prime pairs: 4, 6, 12, 18, 30, 42, 60, 72, 102, 108, 138, 150, ... 108 = 6 + 12 + 18 + 30 + 42, 570 = 72 + 102 + 108 + 138 + 150, ... MATHEMATICA PrimeNextTwinAverage[n_]:=Module[{k}, k=n+1; While[ !PrimeQ[k-1]||!PrimeQ[k+1], k++ ]; k]; lst={}; Do[If[PrimeQ[n-1]&&PrimeQ[n+1], a=n; b=PrimeNextTwinAverage[a]; c=PrimeNextTwinAverage[b]; d=PrimeNextTwinAverage[c]; e=PrimeNextTwinAverage[d]; a=a+b+c+d+e; If[PrimeQ[a-1]&&PrimeQ[a+1], AppendTo[lst, a]]], {n, 3*8!}]; lst CROSSREFS Cf. A040040, A014574, A160916, A160917, A160918 Sequence in context: A063880 A059436 A233685 * A129027 A288706 A204276 Adjacent sequences: A160916 A160917 A160918 * A160920 A160921 A160922 KEYWORD nonn,less AUTHOR Vladimir Joseph Stephan Orlovsky, May 30 2009 STATUS approved

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

Last modified September 22 11:05 EDT 2023. Contains 365520 sequences. (Running on oeis4.)