conc = c(.03,.1 , .3 , 1 , 3 , 10 , 30 , 100)
resp = c( 0 , 0 , .1 ,.2 , .5 , 1 , 1.5 , 2 )
p = c(tp = 2, ga = 3, p = 4, er = .5)
tcplObj(p,conc,resp,"exp5")
lconc = log10(conc)
tcplObj(p,lconc,resp,"loghill")
Run the code above in your browser using DataLab