A141079 a(n)=abs(p(n)*p(n+3)-p(n+1)*p(n+2)), where p(n)=n-th prime.

1, 2, 12, 24, 12, 24, 56, 78, 48, 42, 184, 24, 152, 46, 260, 48, 102, 304, 110, 126, 60, 276, 250, 630, 24, 12, 24, 1272, 72, 1156, 294, 476, 24, 676, 580, 374, 60, 286, 740, 644, 24, 1206, 12, 1520, 1942, 1880, 2302, 24, 896, 498, 884, 932, 1124, 72, 1100, 48

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

If n=1, then a(1)=abs(p(1)*p(4)-p(2)*p(3))=abs(2*7-3*5)=abs(14-15)=1.
If n=2, then a(2)=abs(p(2)*p(5)-p(3)*p(4))=abs(3*11-5*7)=abs(33-35)=2.
If n=5, then a(5)=abs(p(5)*p(8)-p(6)*p(7))=abs(11*19-13*17)=abs(209-221)=12, etc.

Maple

p:=ithprime: seq(abs(p(n)*p(n+3)-p(n+1)*p(n+2)), n=1..60); # Emeric Deutsch, Aug 27 2008

Mathematica

Abs[#[[1]]*#[[4]]-#[[2]]#[[3]]]&/@Partition[Prime[Range[60]], 4, 1] (* Harvey P. Dale, May 14 2019 *)

Crossrefs

Sequence in context: A112718 A365500 A117301 * A269841 A144551 A174457

Adjacent sequences: A141076 A141077 A141078 * A141080 A141081 A141082

Keyword

nonn

Author

Juri-Stepan Gerasimov, Aug 05 2008

Extensions

Corrected and extended by Emeric Deutsch, Aug 27 2008

Status

approved