主要是想得到步长为0.1的csv数据，然后得到结果是这样的，请问是程序出错还是结果就是这样
y = {\[Kappa] = 1; \[Epsilon] = 0.02*\[Kappa]; \[Eta] =
0.88; \[Mu]2 = 0.99*\[Kappa]; \[Mu]1 = 0.96*\[Kappa]; \[Lambda] =
7/10^5; Log[(((2*(\[CapitalDelta] + \[Eta]) - I*\[Kappa])^2 -
4*\[Mu]1*\[Mu]2)*((2*(\[CapitalDelta] + \[Eta]) +
I*\[Kappa])^2 - 4*\[Mu]1*\[Mu]2)*
(16*\[CapitalDelta]^4*\[Lambda] -
16*I*\[CapitalDelta]^3*(\[Epsilon]^2 +
5*I*\[Eta]*\[Lambda] + 2*\[Kappa]*\[Lambda]) -
2*I*\[Epsilon]^2*((2*\[Eta] - I*\[Kappa])^2*(4*\[Eta] -
I*\[Kappa]) + 4*\[Eta]*\[Mu]1*\[Mu]2) +
4*\[CapitalDelta]*((2*\[Eta] -
I*\[Kappa])*(\[Epsilon]^2*(-10*I*\[Eta] -
3*\[Kappa]) + (2*\[Eta] - I*\[Kappa])*(7*\[Eta] -
2*I*\[Kappa])*\[Lambda]) +
2*(-8*\[Eta] + 3*I*\[Kappa])*\[Lambda]*\[Mu]1*\[Mu]2 +
2*(2*\[Eta] -
I*\[Kappa])*\[Lambda]*\[Mu]2^2) + \[Lambda]*((2*\[Eta] \
- I*\[Kappa])^2 - 4*\[Mu]1*\[Mu]2)*(8*\[Eta]^2 -
6*I*\[Eta]*\[Kappa] - \[Kappa]^2 +
2*\[Mu]2*(-\[Mu]1 + \[Mu]2)) +
8*\[CapitalDelta]^2*(\[Epsilon]^2*(-8*I*\[Eta] -
3*\[Kappa]) + \[Lambda]*(18*\[Eta]^2 -
15*I*\[Eta]*\[Kappa] - 3*\[Kappa]^2 -
3*\[Mu]1*\[Mu]2 + \[Mu]2^2)))*(16*\[CapitalDelta]^4*\
\[Lambda] +
16*\[CapitalDelta]^3*(I*\[Epsilon]^2 + 5*\[Eta]*\[Lambda] +
2*I*\[Kappa]*\[Lambda]) +
4*I*\[Epsilon]^2*((1/
2)*(2*\[Eta] + I*\[Kappa])^2*(4*\[Eta] + I*\[Kappa]) +
2*\[Eta]*\[Mu]1*\[Mu]2) +
4*\[CapitalDelta]*((2*\[Eta] +
I*\[Kappa])*(\[Epsilon]^2*(10*I*\[Eta] -
3*\[Kappa]) + (2*\[Eta] + I*\[Kappa])*(7*\[Eta] +
2*I*\[Kappa])*\[Lambda]) -
2*(8*\[Eta] + 3*I*\[Kappa])*\[Lambda]*\[Mu]1*\[Mu]2 +
2*(2*\[Eta] + I*\[Kappa])*\[Lambda]*\[Mu]2^2) +
\[Lambda]*((2*\[Eta] + I*\[Kappa])^2 -
4*\[Mu]1*\[Mu]2)*(8*\[Eta]^2 +
6*I*\[Eta]*\[Kappa] - \[Kappa]^2 +
2*\[Mu]2*(-\[Mu]1 + \[Mu]2)) +
8*\[CapitalDelta]^2*(\[Epsilon]^2*(8*I*\[Eta] -
3*\[Kappa]) + \[Lambda]*(18*\[Eta]^2 +
15*I*\[Eta]*\[Kappa] - 3*\[Kappa]^2 -
3*\[Mu]1*\[Mu]2 + \[Mu]2^2))))/
(4*\[Epsilon]^4*(2*\[CapitalDelta] + 4*\[Eta] -
I*\[Kappa])*(2*\[CapitalDelta] + 4*\[Eta] +
I*\[Kappa])*(4*(\[CapitalDelta] + \[Eta])^2 + \
\[Kappa]^2)^2*((2*\[CapitalDelta] + 4*\[Eta] -
I*\[Kappa])*(2*(\[CapitalDelta] + \[Eta]) - I*\[Kappa]) -
4*\[Mu]1*\[Mu]2)*((2*\[CapitalDelta] + 4*\[Eta] +
I*\[Kappa])*(2*(\[CapitalDelta] + \[Eta]) + I*\[Kappa]) -
4*\[Mu]1*\[Mu]2))]};
Data = Table[y, {\[CapitalDelta], -5, 5, 0.001}];
Export["D:/mathematica12.0/Out1.csv", Data, "Table"]

考虑Re或Chop

……你这代码真是完美诠释了什么叫做画蛇添足。本来，当你在文件名里加了".csv"而又没加Export第3参数的时候，Mathematica是会自动将数据按CSV格式导出的，但是，你偏偏又把第三参数强制指定成了"Table"，这种情况下Mathematica是会忽略文件名里中的扩展名".csv"的——幸亏你这数据每行就一行数，"CSV"数据和"Table"数据格式恰好一样，否则嘛
(心照不宣)
……