ExcelのソルバR

Question

私はのExcelソルバーに似た何かを見つけようとしています。私はrが「L」の値を検索したい

L=2.4 
UCL=L; LCL=-L 
ARL=1/(pnorm(LCL, mean = 0, sd = 1, lower.tail = TRUE)+pnorm(UCL, mean = 0, 
sd = 1, lower.tail = FALSE)) 

私の結果「ARL」は、例えばに近いような：

たとえば、私は次のプログラムを持っています200.

rの方法はありますか？

Answer 1

f <- function(L) { 
    UCL=L; LCL=-L 
    ARL=1/(pnorm(LCL, mean = 0, sd = 1, lower.tail = TRUE)+pnorm(UCL, mean = 0, 
                   sd = 1, lower.tail = FALSE)) 
    ARL-200 
} 

uniroot(f,c(1,10)) 

それはとてもソリューションは、L = 2.807であり、それは13回の反復を取っ

$root 
[1] 2.807 

$f.root 
[1] -0.0003725 

$iter 
[1] 13 

$init.it 
[1] NA 

$estim.prec 
[1] 6.532e-05 

を返します。