User Portlet User Portlet

Discussions
Thank you for your reply. However I tried: f = x (1 - x) Log[1 - 5 x (1 - x)] g = N[Abs[Integrate[f, {x, 0, 1}]]^2, 5] g So I replace t with 5 explicitly, and I got the result 0.20399 and I am confused. Why do I get a defined,...
Hello! I have this code: genus[Q_, n_Integer] := Module[{z, x}, SymmetricReduction[ SeriesCoefficient[ Product[ComposeSeries[Series[Q[z], {z, 0, n}], Series[x[i] z, {z, 0, n}]], {i, 1,...
Hello! I have this function: Clear[chernC]; chernC[0] = 1; chernC[1] = Subscript[ch, 1]; chernC[k_Integer /; k > 0] := chernC[k] = Simplify[(1/k)* Total[Table[(-1)^(j + 1)*Factorial[j]*Subscript[ch,...
I have a small issue with the code, if I have a term that should look like: $p_1^2+p_2$ the output is $p_1^2p_2$. And for all the cases where I should have something of the form $a+1b$ it becomes $ab$. If I have a minus sign, or the factor before b...
Great! Thank you so so much! Not as important, but do you have any idea why $L_1$ in the stuff I posted looks weird?