slope plot back to diff, started using optim function to estimate a curve