Data 605 -Week 13 Discussion
Joseph E. Garcia
November 19, 2018
x <- 1
y <- sqrt(24^2-x^2)
dxdt <- 1
dydt <- -x*dxdt/y
dydt## [1] -0.04170288
x <- 10
y <- sqrt(24^2-x^2)
dxdt <- 1
dydt <- -x*dxdt/y
dydt## [1] -0.4583492
x <- 23
y <- sqrt(24^2-x^2)
dxdt <- 1
dydt <- -x*dxdt/y
dydt## [1] -3.354895
x <- 24
y <- sqrt(24^2-x^2)
dxdt <- 1
dydt <- -x*dxdt/y
dydt## [1] -Inf