To compute this integration numerically you will have to do some kind of simplification in expressing the integrand and in calculating the value of the variable 'c'.
In the expression for 'c', at one point you divide by exp(m*k) where m*k = 1e-13. Using 'double' numbers this would certainly underflow to zero, so you would be dividing by zero at this point, which produces an infinity. The third argument of 'kummer' is also 1e-13. I do not know what this produces but I would suspect it also underflows to zero. If so, the net effect would be infinity times zero for which matlab would produce a NaN.
That same kind of problem is present in calculating the values of the anonymous function 'f'. There are tiny 'k' values within 'exp' and the bessel function in its definition, which will undoubtedly create the same deleterious effect.
As a further difficulty, in the anonymous function 'f' you have included the vector 'p' which has 81 elements. That is not the proper way to define a function which is to serve as an integrand. The integrand should produce a scalar value for 'f' for each individual value of 'r'.