Función de Weierstrass