列出满足一定条件的matric的入口位置

Question

我在Mathematica中有一个多项式的列向量，我已经用另一个多项式划分了向量的每个条目。一些条目现在是多项式，而其他条目是多项式的分数。是否可以列出所有多项式条目的位置？

Answer 1

我想内在函数PolynomialQ可能会有所帮助，但如果没有看到你的代码，就很难确定。

Answer 2

genRndPoly[grade_,var_,max_] := Product[var - RandomInteger[{1,max}], {i, grade}]
rndDivisor = genRndPoly[1, w, 1];
f[max_] := Total@(Boole/@PolynomialQ/@(#/rndDivisor &/@ 
                                            Table[genRndPoly[5, w, max], {100}]))
DiscretePlot[f[max], {max, 30}]