diff options
Diffstat (limited to 'test-prediction-plot.R')
| -rw-r--r-- | test-prediction-plot.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test-prediction-plot.R b/test-prediction-plot.R index d1d6acb..4cee05e 100644 --- a/test-prediction-plot.R +++ b/test-prediction-plot.R @@ -1,13 +1,13 @@ library(ggplot2) -combined = read.csv("data/combined-test-predictions.csv",header=T) +training = read.csv("data/training-test-predictions.csv",header=T) test <- read.csv("data/test.csv",header=T) n = c("SMILES","LOAEL","Source") data = data.frame(factor(test$SMILES),test$LOAEL,factor(test$Dataset)) names(data) = n data$Type = "experimental" -comb = data.frame(factor(combined$SMILES),combined$LOAEL_predicted,factor(combined$Dataset)) +comb = data.frame(factor(training$SMILES),training$LOAEL_predicted,factor(training$Dataset)) names(comb) = n comb$Type = "predicted" data = rbind(data,comb) |