Multidimentional integrals in julia: speed and automatic differentiation

I would like to differentiate through a two-dimensional integral.

Therefore, two questions:

  1. Are there tricks to differentiate Cuba?
  2. Is there a way to speed up Julia native implementations?

Here is MWE and tests

using BenchmarkTools

using HCubature
using NIntegration
using QuadGK
using Cuba

function model(cosĪø,Ļ•; pars)
    Ī±1 = Ī±2 = pars[1]-1
    v = (exp(-Ī±1*(cosĪø+1)) + exp(-Ī±2*(1-cosĪø)))*(1+sin(Ļ•))^(1.2)
    return abs2(v)
end
#
# using Plots
# plot(cosĪø -> model(cosĪø,Ļ€/4; pars = [2.3]), -1, 1)
#
I_quadgk(pars) = quadgk(cosĪø->quadgk(Ļ•->model(cosĪø,Ļ•;pars=pars),-Ļ€,Ļ€)[1],-1.0, 1.0)[1]
I_nintegration(pars) = nintegrate((cosĪø,Ļ•,z)->model(cosĪø,Ļ•;pars=pars), (-1.0, -Ļ€, 0.0), (1.0, Ļ€, 1.0))[1]
I_hcubature(pars) =  hcubature(x->model(x[1],x[2]; pars= pars), [-1.0, -Ļ€], [1.0, Ļ€])[1]
I_cuba(pars) = cuhre((x,f)->f[1]=model(2x[1]-1, Ļ€*(2x[2]-1);pars=pars),2,1).integral[1]*(4Ļ€)
#
@btime I_cuba([2.3])
@btime I_quadgk([2.3])
@btime I_hcubature([2.3])
@btime I_nintegration([2.3])

Results are:

1) Cuba:          72.500 Ī¼s (1305 allocations: 61.28 KiB)
2) 2x QuadGK:    160.800 Ī¼s (827 allocations: 19.44 KiB)
3) NIntegration: 303.800 Ī¼s (209 allocations: 9.91 KiB)
4) HCubature:      2.215 ms (23787 allocations: 850.86 KiB)

I found it quite surprising with respect to the number of github stars on the packages :slight_smile:

EDIT: replaced parameters to a vector.

Pin the experts: @stevengj, @giordano, @pabloferz.
Any thoughts are welcome!

Shouldnā€™t it be fairly straightforward to just use an analytical derivative here? If youā€™re using this inside other code using e.g. Zygote, you could also write a custom adjoint for Cuba.jl.

My working problem is more complicated than that.
However, trying Zygote is an interesting idea. Could maybe sketch an example?
Letā€™s say, the parameter is a vector of dim2. Thanks in advance!

Yes. FWIW, we made Quadrature.jl parameter explicit to make it easy to write the adjoint, I just havenā€™t gotten to it yet. It would be fairly straightforward to do though.

With Zygote, you could solve it like this, by differentiating through the integrand:

using Cuba, Zygote

function model(cosĪø,Ļ•; Ī±p1 = 2.3)
    Ī±1 = Ī±2 = Ī±p1-1.0
    v = (exp(-Ī±1*(cosĪø+1)) + exp(-Ī±2*(1-cosĪø)))*(1+sin(Ļ•))^(1.2)
    return abs2(v)
end

integrand(x, Ī±p1) = model(2x[1]-1, Ļ€*(2x[2]-1);Ī±p1=Ī±p1)
I_cuba(Ī±p1) = cuhre((x, f) -> f[1]=integrand(x, Ī±p1),2,1).integral[1]*(4Ļ€)
Zygote.@adjoint I_cuba(Ī±p1) = I_cuba(Ī±p1), Ī” -> (Ī” * cuhre((x, f) -> f[1]=Zygote.pullback(a -> integrand(x, a), Ī±p1)[2](1)[1], 2, 1).integral[1] * (4Ļ€),)

And then get the gradient:

julia> Zygote.gradient(x -> I_cuba(x[1]), [2.3])
([-13.368478696191737],)

It should be fairly easy to replace Ī±p1 with a vector if you have multiple parameters.

2 Likes

If you only a few parameters, it might be also worth considering using ForwardDiff for the integrand instead of Zygote.pullback, since that will then probably be faster.

1 Like

Nice, I will try that. Thanks a lot

Regarding the benchmark ā€” it isnā€™t an entirely fair comparison, since you probably arenā€™t computing the integrals to the same accuracy in the different routines. For example, in NIntegration I think the default relative error is 1e-6, whereas in HCubature the default is sqrt(Īµ) ā‰ˆ 1.5e-8

(Even if you set the same error tolerances in all the approaches, because they estimate errors in different ways you might get substantially different accuracy. One way to compare would be to compute the ā€œexactā€ integral using a very low tolerance in one of the routines, and then check out what tolerance is needed in each routine to roughly obtain a given relative error, e.g. 1e-6.)

That being said, I suspect that there may have been a performance regression in HCubature ā€” it didnā€™t use to require so many allocations if I recall correctly (it uses StaticArrays internally so its temporary arrays are not supposed to be heap-allocated.) Iā€™ll have to look into it.

Since you have a smooth integrand in 2d, you might also want to try the pcubature function from Cubature.jl.

7 Likes

A good point, I have not thought about accuracy, indeed.
I tend to assume pragmatically that the returned value is exact, but of course it is not the case.

Thank you for suggestion trying Cubature, I was puzzled by the difference between Cubature and HCubature.