login
A141078
a(n) = abs(prime(n)*prime(n+4) - prime(n+1)*prime(n+3)).
1
1, 16, 6, 54, 6, 14, 24, 10, 130, 24, 134, 34, 140, 150, 84, 190, 24, 72, 48, 260, 50, 72, 440, 468, 234, 186, 990, 174, 130, 1692, 714, 632, 520, 736, 270, 96, 96, 390, 584, 800, 330, 1608, 1894, 1472, 342, 2326, 1904, 406, 24, 1326, 108, 920, 1184, 1112, 84, 610
OFFSET
1,2
LINKS
EXAMPLE
a(4) = abs(prime(4)*prime(4+4) - prime(4+1)*prime(4+3)) = abs(7*19 - 11*17) = abs(133 - 187) = abs(-54) = 54.
MAPLE
p:=ithprime: seq(abs(p(n)*p(n+4)-p(n+1)*p(n+3)), n=1..60); # Emeric Deutsch, Aug 14 2008
PROG
(GAP) P:=Filtered([1..300], IsPrime);;
List([1..56], n->AbsInt(P[n]*P[n+4]-P[n+1]*P[n+3])); # Muniru A Asiru, Feb 09 2018
CROSSREFS
Cf. A090076.
Sequence in context: A070568 A161884 A166210 * A298830 A302215 A057964
KEYWORD
nonn,less
AUTHOR
EXTENSIONS
Corrected and extended by Emeric Deutsch, Aug 14 2008
STATUS
approved