conc = rep(".03|.1|.3|1|3|10|30|100",2)
resp = rep("0|0|.1|.1|.5|.5|1|1",2)
indf = data.frame(top = c(1,1), ac50 = c(3,4), conc = conc, resp = resp,
stringsAsFactors = FALSE)
hitlogic(indf, newcutoff = c(.8,1.2))
Run the code above in your browser using DataLab