I want to solve the following equation for θ by using Newton Raphson method in Rstudio
A=ny
θ=(A(1-e^(-θ)))/((n-n_0))
can someone help me for that.
I want to solve the following equation for θ by using Newton Raphson method in Rstudio
A=ny
θ=(A(1-e^(-θ)))/((n-n_0))
can someone help me for that.
Newton Raphson is a numerical method for solving real valued functions.
I'm not seeing a real valued function here.
Here is a Newton-Raphson example. It is not generalized: you need to choose the plot limits and initial value, and you need to calculate the derivative.
x<- seq(from=-5, to=5, .001)
y <- x^3 - x - 1
plot(x,y)
abline(h=0)
x <- vector()
f <- vector()
x_new <- 1.5
for (n in 1:10){
x[n] <- x_new
f[n] <- (x[n])^3 - x[n] - 1
fprime <- 3 * (x[n])^2 - 1
x_new <- x[n] - f[n]/fprime
if ( (abs(x[n] - x_new)/x[n]) < .00005 ){break}
}
df <- data.frame(cbind(x,f))
df
paste0("Solution is ", round(x[n],6))
Thank you for your help.
This topic was automatically closed 21 days after the last reply. New replies are no longer allowed.
If you have a query related to it or one of the replies, start a new topic and refer back with a link.