Matrix 列示满足一定条件的矩阵的入口位置_Matrix_Wolfram Mathematica

Matrix 列示满足一定条件的矩阵的入口位置

matrix wolfram-mathematica

Matrix 列示满足一定条件的矩阵的入口位置,matrix,wolfram-mathematica,Matrix,Wolfram Mathematica,在Mathematica中，我有一个多项式列向量，我将向量的每个条目除以另一个多项式。一些条目现在是多项式，另一些是多项式的分数。是否可以列出所有多项式项的位置？我想内在函数PolynomialQ可能会有所帮助，但如果没有看到您的代码，就很难确定 genRndPoly[grade_,var_,max_] := Product[var - RandomInteger[{1,max}], {i, grade}] rndDivisor = genRndPoly[1, w, 1]; f[max_] :=

在Mathematica中，我有一个多项式列向量，我将向量的每个条目除以另一个多项式。一些条目现在是多项式，另一些是多项式的分数。是否可以列出所有多项式项的位置？

我想内在函数

PolynomialQ

可能会有所帮助，但如果没有看到您的代码，就很难确定

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}]