OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
a(4)= 4669455 because prime(4) = 7 =>
4669455 = 7*667065 ;
4669456 = 11*424496 ;
4669457 = 13*359189 ;
4669458 = 17*274674 ;
4669459 = 19*245761 ;
4669460 = 23*203020.
MAPLE
with(numtheory):for p from 1 to 15 do: p1:=ithprime(p):p2:=ithprime(p+1):p3:=ithprime(p+2):p4:=ithprime(p+3):p5:=ithprime(p+4):p6:=ithprime(p+5):it:=0:for
n from 1 to 50000000 while(it=0) do:if irem(n, p1)=0 and irem(n+1, p2)=0 and
irem(n+2, p3)=0 and irem(n+3, p4)=0 and irem(n+4, p5)=0 and irem(n+5, p6)=0
then it:=1:printf(`%d, `, n):else fi:od:od:
PROG
(Sage) def A180159(n): return crt([-5..0][::-1], [nth_prime(i) for i in [n..n+5]]) # D. S. McNeil, Jan 16 2011
(PARI) a(n)=my(p=prime(n), r=Mod(0, p)); for(i=1, 5, p=nextprime(p+1); r=chinese(r, Mod(-i, p))); lift(r) \\ Charles R Greathouse IV, Jan 16 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Jan 16 2011
STATUS
approved