Mejora de la función isPrime