Математический эксперимент с Математикой 14 наводит на предположение, что при нецелых значениях
регуляризация по Абелю не работает. Действительно,
Код:
a = 11/2; n = Pi; Table[NSum[(-x)^m/m*((n - m)^a - (n + m)^a), {m, 1, Infinity},
WorkingPrecision -> 25, Method -> "AlternatingSigns", NSumTerms -> 30], {x, 0.90, 0.99, 0.01}]
выдает
Код:
{-337038.82180683045620189 -
52867.983446370337523 I, -472428.69341487852870622 -
74041.697428329240103 I, -659606.42915862456878121 -
103311.387981834973296 I, -917464.04773132851133352 -
143629.35913649412684 I, -1.27145904808160666159462*10^6 -
198973.53280414379851 I, -1.7557854202488848890786*10^6 -
274686.45884311737692 I, -2.4162268171425279567771*10^6 -
377920.80409175162864 I, -3.3138952677657822914242*10^6 -
518223.05309088326278 I, -4.5301162554003434070923*10^6 -
708296.11202903415191 I, -6.1727937702803569186338*10^6 -
964992.85810175819448 I}
Правильность вышеуказанных значений подтверждается частичной суммой
Код:
Sum[(-x)^m/m*((n - m)^a - (n + m)^a) /. x -> 0.97000000000000000000000000000, {m, 1, 300}]
, которая производит
Код:
-7.9242206164439308155602*10^6 - 7.0641999379878348774450*10^6 I
Безуспешно пытался применить здесь регуляризацию Бореля.