This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A104875 #13 Nov 01 2019 10:57:25 %S A104875 15014,1062346,600662302,2224636919002,118335570521086, %T A104875 168652154886862,3790374062238502,6290838589498366,127018534712243098, %U A104875 131125107904515418,190740905520325018,2057351971883521282,3151949824862998762 %N A104875 Semiprimes of the form prime(n)*prime(n+1)*prime(n+2)*prime(n+3)*prime(n+4) - 1. %C A104875 This is the five-consecutive-prime minus one equivalent of A103533. %H A104875 Vincenzo Librandi, <a href="/A104875/b104875.txt">Table of n, a(n) for n = 1..1000</a> %e A104875 n prime(n) * prime(n+1) * prime(n+2) * prime(n+3) * prime(n+4) - 1 %e A104875 1: 2 * 3 * 5 * 7 * 11 - 1 = 2309 is prime; examples hereafter are semiprime %e A104875 2: 3 * 5 * 7 * 11 * 13 - 1 = 15014 = 2 * 7507 %e A104875 5: 11 * 13 * 17 * 19 * 23 - 1 = 1062346 = 2 * 531173 %e A104875 15: 47 * 53 * 59 * 61 * 67 - 1 = 600662302 = 2 * 300331151 %e A104875 60: 281 * 283 * 293 * 307 * 311 - 1 = 2224636919002 = 2 * 1112318459501 %e A104875 117: 643 * 647 * 653 * 659 * 661 - 1 = 118335570521086 = 2 * 59167785260543 %t A104875 Bigomega[n_]:=Plus@@Last/@FactorInteger[n]; SemiprimeQ[n_]:=Bigomega[n]==2; Select[Table[Prime[n]*Prime[n+1]*Prime[n+2]*Prime[n+3]*Prime[n+4]-1, {n, 1000}], SemiprimeQ] (* _Ray Chandler_, Mar 29 2005 *) %Y A104875 Cf. A000040, A001358, A006881, A103533, A103614, A103746, A104874. %K A104875 easy,nonn %O A104875 1,1 %A A104875 _Jonathan Vos Post_, Mar 29 2005 %E A104875 Extended by _Ray Chandler_, Mar 29 2005