[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A323139
Integers that are not multiples of 6 and are the sum of two consecutive primes.
1
5, 8, 52, 68, 100, 112, 128, 152, 172, 268, 308, 320, 340, 352, 410, 434, 472, 508, 520, 532, 548, 668, 712, 740, 752, 772, 872, 892, 946, 1012, 1030, 1064, 1088, 1120, 1132, 1148, 1180, 1192, 1208, 1220, 1250, 1300, 1312, 1334, 1360, 1460, 1472, 1508, 1606, 1888, 1900, 1948, 1960, 1988, 2006, 2032, 2072, 2132, 2156
OFFSET
1,1
COMMENTS
All primes, except 2 and 3, are of the form 6k+1 or 6k-1 for k a positive integer. The converse statement is not true for all k, so the sum of two consecutive primes is not always a multiple of 6. This sequence lists the sums of two consecutive primes that are not multiple of 6.
LINKS
EXAMPLE
52 = 23 + 29 is not a multiple of 6.
MAPLE
p:= 2:
count:= 0: Res:= NULL:
while count < 100 do
q:= nextprime(p);
if p+q mod 6 <> 0 then
count:= count+1; Res:= Res, p+q;
fi;
p:= q;
od:
Res; # Robert Israel, Jan 09 2019
MATHEMATICA
Select[Total /@ Partition[Prime@ Range@ 180, 2, 1], Mod[#, 6] != 0 &] (* Michael De Vlieger, Jan 07 2019 *)
PROG
(PARI) my(p=2); forprime(q=3, 1e3, if ((p+q) % 6, print1(p+q", ")); p=q); \\ Michel Marcus, Jan 05 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Pedro Caceres, Jan 05 2019
STATUS
approved