私は次の関数を最小化する必要が

Question

関数の結果を抽出します。

calloptim <- function(under,strike, rf, ttoe,par) {(-(under*par[1] 
    -strike*exp(-rf*ttoe)*par[2]))^2} 

私は、次のオブジェクトを作成：

res<- nlminb(c(1,1), calloptim, under= 90, strike = 100, rf =0.05, ttoe=3) 

res 

$par 
[1] 0.9771973 1.0218072 

$objective 
[1] 3.412923e-16 

$convergence 
[1] 1 

$iterations 
[1] 2 

$evaluations 
function gradient 
     34  4 

$message 
[1] "false convergence (8)" 

これは結構ですが、今私がつかむしたいが$ par推定値をベクトルに入れて、他の計算に使用することができます。

オブジェクトの結果の一部のみを分離して保存するにはどうすればよいですか？

Answer 1

次は、すべてほぼ同じです：

res$par 
res["par"] 
res[1] 
res[[1]] 

は詳細については?Extractのヘルプページを見てください。私はしばしば、オブジェクトを取得する場所、つまり、抽出するオブジェクトの名前か、見ているオブジェクト内の数値の場所（この場合は1）のいずれかを見つけるときに役立つオブジェクトのstr()を調べています。

Answer 2

これはまさにあなたが求めているものを回答しますが、あれば知ってはいけないnewVals <- res$par

Answer 3

でresのうち、$parメンバーを引っ張っ：

vector <- res$par 
> vector 
[1] 0.9771973 1.0218072 
> vector[1] 
[1] 0.9771973 

より「適切であるアクセサメソッドがあるかもしれません。

Answer 4

これはあなたのprevious questionの拡張である場合は、あなたがそれらのネストされた答えを抽出することができます。

out <- apply(f, 1, nlminb, objective=calloptim, under=90, strike=100, rf=0.05, ttoe=3) 
out.par <- lapply(out, '[',1) 
unlist(out.par, recursive=FALSE)