2011-03-25から1日間の記事一覧
"rootSolve"の中の multiroot() 多元の連立方程式の解(のベクトル)を返してくれる library(rootSolve) model <- function(x) c(F1= x[1] + x[2] + x[3]^2 - 12, F2= x[1]^2 - x[2] + x[3] - 2, F3= 2 * x[1] - x[2]^2 + x[3] - 1 ) (ss<-multiroot(model,c…
"rootSolve"の中の multiroot() 多元の連立方程式の解(のベクトル)を返してくれる library(rootSolve) model <- function(x) c(F1= x[1] + x[2] + x[3]^2 - 12, F2= x[1]^2 - x[2] + x[3] - 2, F3= 2 * x[1] - x[2]^2 + x[3] - 1 ) (ss<-multiroot(model,c…