N[e sum[sum[(-1)^k Binomial[m, k] Sum[gammaregularized(n+1,-1)^k/n!,{n,2,20}],{k,0,20}],{m,0,20}],10]