powered by
dpo.fn(dr, di)
dr <- 0.86; di <- 4; dpo <- dpo.fn(dr, di)
Run the code above in your browser using DataLab