Este problema también puede ser abordado mediante una generación de la función que en este relacionados con la respuesta.
El Uso De Una Generación De Función
Como Jack D'Aurizio notas, podemos construir todas las posibles cadenas donde $6$ no aparece, al menos, $5$ veces con la $5$ átomos
$$
\underbrace{\square\vphantom{6}}_{\large 5x^{\vphantom{1}}},\underbrace{6\square}_{\large 5x^2},\underbrace{66\square}_{\large 5x^3},\underbrace{666\square}_{\large 5x^4},\underbrace{6666\square}_{\large 5x^5}
$$
El coeficiente de $5$ representa el número de maneras de llenar las $\square$. Tenga en cuenta que cualquier secuencia de longitud $50$ puede ser hecho en una manera única de poner juntos a los átomos una longitud de $51$ y la eliminación de la última $\square$. Por lo tanto, en la suma
$$
\begin{align}
\sum_{k=0}^\infty5^k(x+x^2+x^3+x^4+x^5)^k
&=\frac1{1-5\frac{x-x^6}{1-x}}\\
&=\frac{1-x}{1-6x+5x^6}\tag{1}
\end{align}
$$
el coeficiente de $x^{n+1}$ $5$ multiplicado por el número de maneras de organizar $n$ números larga de $5$ seises en una fila.
El coeficiente de $x^{51}$$4021435247555066377711342806458789062500$$6^{50}$$808281277464764060643139600456536293376$. Dividiendo su cociente por $5$ y restando $1$, obtenemos una probabilidad de
$$
\frac{4109288018262124589373497083105433}{831565100272391008892118930510839808}\doteq0.0049416311686434034927\tag{2}
$$
Cómputo De Los Coeficientes Por Recursión
Cómputo de los coeficientes de la generación de la función en $(1)$ puede ser tedioso. He utilizado Mathematica para calcular $(2)$. Sin embargo, hay un manual de más amigable para calcular los coeficientes de uso de la recursividad.
El denominador en $(1)$ nos dice que los coeficientes de la serie debe satisfacer
$$
a_n=6a_{n-1}-5a_{n-6}\etiqueta{3}
$$
donde se computa la primera $6$ términos de la serie de división de
$$
a_0=1,a_1=5,a_2=30,a_3=180,a_4=1080,a_5=6480\etiqueta{4}
$$
El uso de esta recursividad, es más fácil calcular
$$
a_{51}=4021435247555066377711342806458789062500\etiqueta{5}
$$