Obtengo $$\left\{\frac{2}{3},\frac{2}{3},\frac{4}{9},\frac{35}{81},\frac{94}{243},\frac{275}{729},\frac{263}{729},\frac{2267}{6561}\right\}$$
para los polinomios mónicos de grado 1 a 8, usando Mathematica:
f[a_, b_] := a x^(b - 1)
PolysOfDegree[n_] := First /@ Table[ x^n + Plus @@ MapIndexed[f, IntegerDigits[i, 3, n] - 1], {i, 0, 3^n - 1}]
TestFactors[n_] := Table[FactorList[x^i - 1], {i, 1, 2 n + 2}]
// Flatten // Union // Rest
HasRootOfUnityAsRoot[poly_] := Or @@ Map[ PolynomialMod[poly , #] === 0 &, TestFactors[Exponent[poly, x]]]
Prob[n_] := Count[Map[HasRootOfUnityAsRoot, PolysOfDegree[n]], True]/3^n
Table[Prob[n], {n,1,8}]
He enumerado los polinomios de grado $n$, y he enumerado los polinomios característicos de raíces de la unidad de hasta grado $2n+2$. Luego solo se trata de probar cuáles son divisibles por cuáles.
1 votos
Una pregunta algo relacionada: mathoverflow.net/questions/166068/…
6 votos
No tengo tiempo para la computación completa ahora, pero aún así debo señalar que la probabilidad de que $1$ sea raíz ya es del orden de $n^{-1/2}$ y que el número de polinomios ciclotómicos de grado $d$ es a lo sumo $e^{Clog d\log\log d}$, por lo que la probabilidad de que tengamos una raíz de algún polinomio ciclotómico de grado $d$ es a lo sumo $e^{Clog d\log\log d}(1+c\frac nd)^{-d/2}$), lo que muestra que realmente no necesitamos preocuparnos mucho por nada excepto $\pm 1$ para $n$ grande.
2 votos
¿Estás interesado en una estimación asintótica? ¿En límites inferiores/superiores? ¿Valores exactos?
0 votos
@MarcoGolla Un estimado asintótico sería genial. Gracias.
1 votos
La pregunta de si $-1$ es una raíz de $P$ puede estar relacionada con la pregunta de si $1$ es una raíz del polinomio $P^*$ cuyos coeficientes de $i$ impar han tenido sus signos cambiados. Para valores grandes de $n$, la probabilidad de que estos dos polinomios sean distintos se acerca exponencialmente a 1. Para valores grandes de $n$, la probabilidad de que tanto 1 como $-1$ sean raíces es pequeña, por lo que la probabilidad de que $\pm 1$ sea una raíz es el doble de la probabilidad de que 1 sea una raíz. Teniendo en cuenta el comentario de fedja, solo necesitamos estimar la probabilidad de que 1 sea una raíz.
0 votos
@Fedja, ¿de dónde proviene la estimación $(1+c/n)^{-d/2}$? ¿Se cumple para $d=d(n)$?
0 votos
@ofer zeitouni Cada $d$ potencia consecutiva de la raíz son linealmente independientes sobre $\mathbb Q$ y para variables aleatorias simétricas independientes (vectoriales), tenemos $P(X+Y=0)\le\sqrt{P(X+X'=0)P(Y+Y'=0)}$, etc. ($Z'$ es una copia independiente de $Z$, y asumo que la diferencia entre la fórmula en tu comentario y la mía es solo un error tipográfico de tu parte).
0 votos
@fedja sí, fue un error tipográfico de mi parte. Y gracias por el argumento.