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 A127342 #18 Sep 20 2024 17:15:25 %S A127342 6469693230,100280245065,1236789689135,10141675450907,62298863484143, %T A127342 266186053068611,1085220062510491,3766351981654057,12091972151626183, %U A127342 35224440615606707,86239147714071593,203079283326684719 %N A127342 Product of 10 consecutive primes. %C A127342 a(n) = coefficient of x^0 of the polynomial Product_{j=0..9} (x-prime(n+j)) of degree 10; the roots of this polynomial are prime(n), ..., prime(n+9). %t A127342 a = {}; Do[AppendTo[a, Product[Prime[x + n], {n, 0, 9}]], {x, 1, 50}]; a %t A127342 Times@@@Partition[Prime[Range[50]],10,1] (* _Harvey P. Dale_, Oct 21 2011 *) %o A127342 (PARI) {m=12;k=10;for(n=0,m-1,print1(a=prod(j=1,k,prime(n+j)),","))} \\ _Klaus Brockhaus_, Jan 21 2007 %o A127342 (PARI) {m=12;k=10;for(n=1,m,print1(polcoeff(prod(j=0,k-1,(x-prime(n+j))),0),","))} \\ _Klaus Brockhaus_, Jan 21 2007 %o A127342 (Magma) [&*[ NthPrime(n+k): k in [0..9] ]: n in [1..50] ]; // _Vincenzo Librandi_, Apr 03 2011 %Y A127342 Cf. A006094, A046301, A046302, A046303, A046324, A046325, A046326, A046327, A127343, A127344. %K A127342 nonn %O A127342 1,1 %A A127342 _Artur Jasinski_, Jan 11 2007 %E A127342 Edited by _Klaus Brockhaus_, Jan 21 2007