aboutsummaryrefslogblamecommitdiff
path: root/tests/pyrithione.Rout.save
blob: f796a406cd877316a4cbc9be1d110eb5dfb46c68 (plain) (tree)
1
2
3
4
 

                                                             
                                      













                                                            
                  
                                                                               

                             
 
                                   


                        
 
                     
 
                                                                          
                                            

                      
 
                                   


                      
 
                      
 
                                   

                    
 
                                   



                                                                            

                             
 
                                   

                             
 
                                   

                             
 
                                   
 
                     
 
                                   

                    
 
                                   

                    
 




























                                                                           
  

                        
                        

R version 3.1.1 (2014-07-10) -- "Sock it to Me"
Copyright (C) 2014 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(drfit)
> data(pyrithione)
> rpyr <- drfit(pyrithione,linlogit=TRUE,linlogitWrong=c("MSPT","MSPHI","PyS"))

Na Pyrithion: Fitting data...

Waiting for profiling to be done...

Pyridin: Fitting data...


PyNO: Fitting data...

Error in nls(response ~ linlogitf(dose, 1, f, logED50, b), data = tmp,  : 
  Convergence failure: false convergence (8)

(PT)2: Fitting data...

Waiting for profiling to be done...

MSO2P: Fitting data...


MSPHI: Fitting data...

Waiting for profiling to be done...

PyS: Fitting data...

Waiting for profiling to be done...
Error in numericDeriv(form[[3L]], names(ind), env, ifelse(internalPars <  : 
  Missing value or an infinity produced when evaluating the model
In addition: Warning message:
In pnorm(-log10(dose), -logED50, scale) : NaNs produced

Zn Pyrithion: Fitting data...

Waiting for profiling to be done...

Cu Pyrithion: Fitting data...

Waiting for profiling to be done...

Fe Pyrithion: Fitting data...

Waiting for profiling to be done...

MSPT: Fitting data...

Waiting for profiling to be done...

TBT: Fitting data...

Waiting for profiling to be done...

NaJ: Fitting data...

> print(rpyr,digits=2)
      Substance ndl   n   lld lhd    mtype logED50  2.5% 97.5%   unit sigma
1  Na Pyrithion  20 108 -2.11 2.0 linlogit   -0.35 -0.43 -0.26 microM  0.21
2       Pyridin  19 161  0.59 3.7 inactive      NA    NA    NA microM    NA
3          PyNO  19  81  0.59 3.7   no fit      NA    NA    NA microM  0.11
4         (PT)2  19  81 -2.41 2.0 linlogit   -0.42 -0.53    NA microM  0.21
5         MSO2P  28 108 -1.71 3.7 inactive      NA    NA    NA microM    NA
6         MSPHI  19  81  0.59 3.7   probit    3.66  3.55  3.88 microM  0.13
7           PyS  18  80 -0.41 3.0   probit    2.68    NA    NA microM  0.13
8  Zn Pyrithion  27  81 -2.11 2.0 linlogit   -0.41 -0.53 -0.30 microM  0.23
9  Cu Pyrithion  19  79 -2.41 2.0 linlogit   -0.31 -0.48 -0.15 microM  0.24
10 Fe Pyrithion  19  81 -2.41 2.0 linlogit   -0.35 -0.50 -0.21 microM  0.23
11         MSPT  18 108 -0.41 3.0   probit    2.14  2.07  2.21 microM  0.23
12          TBT  38 135 -2.71 2.4 linlogit   -0.16 -0.26 -0.05 microM  0.19
13          NaJ  10 108  0.59 3.3 inactive      NA    NA    NA microM    NA
       a    b      c
1  -0.35 2.12 -0.267
2     NA   NA     NA
3     NA   NA     NA
4  -0.42 1.85 -0.515
5     NA   NA     NA
6   3.66 0.44     NA
7   2.68 0.13     NA
8  -0.41 1.74  0.611
9  -0.31 1.02 -0.049
10 -0.35 1.18  0.025
11  2.14 0.21     NA
12 -0.16 1.04 -0.024
13    NA   NA     NA
> 
> proc.time()
   user  system elapsed 
  2.302   1.804   1.550 

Contact - Imprint