(1) Было бы полезно, если вы предоставите явный код, который вы используете. Таким образом, другим (читай: мне) не нужно кодировать его отдельно.
(2) Если интеграл существует, он должен быть равен нулю. Это потому, что вы отрицаете коэффициент n (y) -n (x), когда вы меняете местами x и y, но оставляете все остальное. Тем не менее, симметрия диапазона интеграции означает, что это просто переименование ваших переменных, следовательно, оно должно остаться прежним.
(3) Вот некоторый код, который показывает, что он будет равен нулю, по крайней мере, если мы обнуляем единственную часть и небольшую полосу вокруг нее.
a = 1;
b = 1;
beta = 1;
eps[x_] := 2*(a-b*Cos[x])
n[x_] := 1/(1+Exp[beta*eps[x]])
delta = .001;
pw[x_,y_] := Piecewise[{{1,Abs[Abs[x]-Abs[y]]>delta}}, 0]
Мы добавляем 1 к интеграту, чтобы избежать проблем с точностью, близкой к нулю.
NIntegrate[1+Cos[(x+y)/2]^2*(n[x]-n[y])/(eps[x]-eps[y])^2*pw[Cos[x],Cos[y]],
{x,-Pi,Pi}, {y,-Pi,Pi}] / (4*Pi^2)
Я получаю результат ниже.
NIntegrate::slwcon:
Numerical integration converging too slowly; suspect one of the following:
singularity, value of the integration is 0, highly oscillatory integrand,
or WorkingPrecision too small.
NIntegrate::eincr:
The global error of the strategy GlobalAdaptive has increased more than
2000 times. The global error is expected to decrease monotonically after a
number of integrand evaluations. Suspect one of the following: the
working precision is insufficient for the specified precision goal; the
integrand is highly oscillatory or it is not a (piecewise) smooth
function; or the true value of the integral is 0. Increasing the value of
the GlobalAdaptive option MaxErrorIncreases might lead to a convergent
numerical integration. NIntegrate obtained 39.4791 and 0.459541
for the integral and error estimates.
Out[24]= 1.00002
Это хороший признак того, что незапятнанный результат будет нулевым.
(4) Подставляя cx для cos (x) и cy для cos (y) и удаляя посторонние факторы в целях оценки сходимости, дает выражение ниже.
((1 + E^(2*(1 - cx)))^(-1) - (1 + E^(2*(1 - cy)))^(-1))/
(2*(1 - cx) - 2*(1 - cy))^2
Последовательное разложение в cy, центрированное в cx, указывает на полюс порядка 1. Таким образом, оно представляется сингулярным интегралом.
Даниэль Лихтблау