search for: k13

...and here is my fonction "saeqn". > saeqn<-function(s,l) + { + + + p<- exp(-l$gp$lambda+s)*l$gp$c + + + k11<-(l$gp$mu*(l$gp$lambda^2)*l$gp$c-s*l$gp$lambda*l$gp$c*l$gp$mu+l$gp$mu*l$gp$lambda)*p + + k12 <- -l$gp$mu*l$gp$lambda-s^2+2*s*l$gp$lambda-(l$gp$lambda^2) + + k13 <-k11+k12 + + k14<-(l$gp$lambda-s)*(-l$gp$mu*s-s*l$gp$lambda+s^2+l$gp$mu*l$gp$lambda*p) + + k1<- -k13/k14 + + k1-l$t + } . There is something I must be missing since I never had luck with "uniroot"! Thanks,

...## ## Running config.status. ## ## ---------------------- ## This file was extended by OpenSSH config.status Portable, which was generated by GNU Autoconf 2.59. Invocation command line was CONFIG_FILES = CONFIG_HEADERS = CONFIG_LINKS = CONFIG_COMMANDS = $ ./config.status on K13 config.status:714: creating Makefile config.status:714: creating buildpkg.sh config.status:714: creating opensshd.init config.status:714: creating openbsd-compat/Makefile config.status:714: creating scard/Makefile config.status:714: creating ssh_prng_cmds config.status:714: creating survey.sh conf...