powered by
get.primes(n)
min(n, 100000)
torus
p <- get.primes(20) torus(5,dim=10,prime=p[11:20])
Run the code above in your browser using DataLab