From fec95dfbf0abe4175649e399eb1fcd698d482a9a Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Thu, 30 Mar 2017 17:54:16 +0200 Subject: Add checkcontrols, updates, see ChangeLog --- R/drdata.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'R/drdata.R') diff --git a/R/drdata.R b/R/drdata.R index 0bf9597..dc741a6 100644 --- a/R/drdata.R +++ b/R/drdata.R @@ -21,7 +21,7 @@ drdata <- function(substances, experimentator = "%", db = "cytotox", type <- organism } } - + query <- paste("SELECT conc,",responsetype,",unit,experimentator,substance,",testtype, ",ok FROM ", db, " WHERE substance IN ('", slist,"') AND experimentator LIKE '", -- cgit v1.2.1