level 1
f1456453792
楼主
l = 1;
z1 = l/F[\[Theta]];
\[Theta] = Pi/4;
F[\[Theta]] =
Beta[((Cos[\[Theta]]))^2, 2/3, 1/2]/6 +
2 (((\[Sqrt]Pi) Gamma[2/3])/Gamma[1/6]) -
Tan[\[Theta]] (Cos[\[Theta]])^(1/3);
x = Integrate[(z/z1)^3/Sqrt[1 - (z/z1)^6], {z, 0, 1}];
Plot[x[z], {z, 0, 1}]
2022年12月11日 00点12分
1
z1 = l/F[\[Theta]];
\[Theta] = Pi/4;
F[\[Theta]] =
Beta[((Cos[\[Theta]]))^2, 2/3, 1/2]/6 +
2 (((\[Sqrt]Pi) Gamma[2/3])/Gamma[1/6]) -
Tan[\[Theta]] (Cos[\[Theta]])^(1/3);
x = Integrate[(z/z1)^3/Sqrt[1 - (z/z1)^6], {z, 0, 1}];
Plot[x[z], {z, 0, 1}]
