I'm, trying to apply this solution to find the p-value in an arbitrary distribution defined from data experiments. I have estimated this distribution using the density function in R. Now, I would like to integrate this function to apply the solution proposed by @mpiktas. However, the integrate function requires a function as input, not two vectors x and y with the values that define the function, which is what density provides.
Any idea on how to deal with this numerical integration based on x-y values in R?