A284550 Integers n such that prime(n) + prime(n+1) + prime(n+2) + prime(n+3) + prime(n)*prime(n+1)*prime(n+2)*prime(n+3) is prime.
1, 2, 9, 35, 45, 61, 80, 84, 97, 98, 124, 130, 140, 142, 175, 179, 185, 213, 241, 249, 287, 300, 324, 344, 346, 352, 366, 368, 369, 384, 389, 398, 400, 409, 431, 436, 437, 462, 515, 520, 525, 530, 544, 565, 592, 594, 595, 614, 615, 627, 628, 682, 719, 745, 778, 798, 835, 852, 861
Offset: 1
Keywords
Examples
n=1: 2+3+5+7+2*3*5*7=227=A000040(49), n=2: 3+5+7+11+3*5*7*11=1181=A000040(194).
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Position[Total[#]+Times@@#&/@Partition[Prime[Range[1000]],4,1],?PrimeQ]//Flatten (* _Harvey P. Dale, Jul 18 2024 *)