WolframAlpha computational knowledge AI
Solve[D[Σ log p + (mn - Σ) log(1-p) - (p-mu)^2/(2 sigma^2),p]=0,p]