WorksheetMinus[Divide[Product[x,PI],x_1],Exponent[x,μ]]Sum[Negative[Exponent[x,μ]],Divide[Product[PI,x],x_1]]WorksheetDeriv[Minus[Divide[Product[x,PI],x_1],Exponent[x,μ]],x]Sum[Negative[Product[μ,Exponent[x,Sum[μ,-1]]]],Divide[PI,x_1]]GraphingPlot2D[Deriv[Minus[Divide[Product[x,PI],x_1],Exponent[x,μ]],x]]