找回密码
 快速注册
搜索
查看: 602|回复: 1

筛选某类有理数域上的可约多项式

[复制链接]

471

主题

945

回帖

9837

积分

积分
9837

显示全部楼层

青青子衿 发表于 2019-10-23 15:58 |阅读模式
Table[With[{expr = (x^2 + p*x + q)^2 + (x^2 + u*x + v)^2},
     If[p*q*u*v != 0 && SquareFreeQ[expr] && ! IrreduciblePolynomialQ[expr],
      expr == Factor[expr], Nothing]],
     {p, 1, 5}, {q, p, 5}, {u, q, 5}, {v, u, 5}] // Flatten // Column // TraditionalForm

\begin{alignat*}{3}
(x^2+x+1)^2+{}&&(x^2+2x+3)^2={}&&(x^2+2x+2) &&(2x^2+2x+5)\\
(x^2+x+2)^2+{}&&(x^2+3x+4)^2={}&&2 (x^2+2x+2) &&(x^2+2x+5)\\
(x^2+x+3)^2+{}&&(x^2+4x+5)^2={}&&(x^2+2x+2) &&(2x^2+6x+17)\\
(x^2+2x+3)^2+{}&&(x^2+3x+3)^2={}&&(x^2+2x+2)&&(2x^2+6x+9)\\
(x^2+2x+4)^2+{}&&(x^2+4x+4)^2={}&&2(x^2+2x+2)&&(x^2+4x+8)\\
(x^2+2x+5)^2+{}&&(x^2+5x+5)^2={}&&(x^2+2x+2){}&&(2x^2+10x+25)\\
(x^2+3x+3)^2 +{}&&(x^2+4x+4)^2={}&&(x^2+4x+5)&&(2x^2+6x+5)\\
(x^2+4x+5)^2+{}&&(x^2+5x+5)^2={}&&(x^2+6x+10)&&(2x^2+6x+5)
\end{alignat*}

730

主题

1万

回帖

9万

积分

积分
93593
QQ

显示全部楼层

kuing 发表于 2019-10-23 17:02
内容看不懂,只说说后面那代码,最后一列的 && 应该去掉一个,即
\begin{alignat*}{3}
(x^2+x+1)^2+{}&&(x^2+2x+3)^2={}&&(x^2+2x+2)&(2x^2+2x+5)\\
.......

手机版|悠闲数学娱乐论坛(第3版)

GMT+8, 2025-3-4 12:05

Powered by Discuz!

× 快速回复 返回顶部 返回列表