login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A126231 Odd interprimes divisible by 19. 8
399, 741, 855, 969, 1197, 1425, 1995, 3021, 3705, 4085, 4731, 4807, 4883, 5415, 5529, 5833, 7315, 7695, 7847, 7923, 8075, 8341, 9063, 9177, 9215, 9823, 10317, 10431, 10507, 10545, 11077, 11115, 11267, 11305, 11457, 11685, 12483, 13167, 13623 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

select(t ->nextprime(t)+prevprime(t)=2*t, [seq(i, i=19..20000, 38)]); # Robert Israel, Mar 17 2020

MATHEMATICA

Do[If[OddQ[(Prime[n + 1] + Prime[n])/2] && Mod[(Prime[n + 1] + Prime[n])/2, 19] == 0, Print[(Prime[n + 1] + Prime[n])/2]], {n, 1, 3000}]

Select[Mean/@Partition[Prime[Range[2000]], 2, 1], OddQ[#]&&Divisible[#, 19]&] (* Harvey P. Dale, Jan 24 2014 *)

CROSSREFS

Cf. A072569, A072572, A072573, A126228, A126229, A126230, A124619, A124620, A124622, A126233.

Sequence in context: A046013 A176911 A202158 * A158317 A227008 A253597

Adjacent sequences:  A126228 A126229 A126230 * A126232 A126233 A126234

KEYWORD

nonn

AUTHOR

Artur Jasinski, Dec 21 2006

EXTENSIONS

Extended by Ray Chandler, Jan 09 2007

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 20 07:21 EDT 2020. Contains 337264 sequences. (Running on oeis4.)