mathematica如何计算复杂三角函数积分
 

S = 0.015; Z = 1.200; SE = 0.017; a0 =
45*Pi/180; P0 = 500000; \[Mu] = 0.19; k = 5; B = 0.800; F = 10000000;
ae = ArcCos[(Z - SE + S)/Z];
m = ((1 + S/Z - Cos[x])*Cos[x])^k;
n = 1 - 5*Z/(4*(SE - S));
nn = 1 - Z/(SE - S);
p = Z/(4*(SE - S))
fs[y_] = Integrate[
Sin[y]/((Cos[y] + S*Cos[y]/Z - (Cos[y])^2))^k, {y, 0, x}]

回复: mathematica如何计算复杂三角函数积分
 

mathematica 有内置的SinIntegrate CosIntegrate等函数 可直接使用