mathematica 在有理数范围内分解因式