(1,|unique [X*] grep(&is-prime,^99+1e5)xx 2).sort[get-1].say