Drawing a Line of Best Fit Through Points with Equal Y-Values in R

Resolving the "‘size’ Cannot Exceed nrow(x) = 1" Error in nlstools Overview Function