i'm trying to integrate a density function but I'm getting the error
Error in integrate(approxfun(data_density), lower = strike_x, upper = strike_y) :
non-finite function value
I removed NAs from data_density already This is my code
data_density <- density(na.omit(data$AAPL.Close))
prob<-try(integrate(approxfun(data_density), lower=strike_x, upper=strike_y))
strike_x and strike_y are positive integers How can I fix this?