diff --git a/resources/variables.R b/resources/variables.R
index 9c0b856..d8c8a59 100644
--- a/resources/variables.R
+++ b/resources/variables.R
@@ -8,8 +8,6 @@ format.percent <- function(x) {x<-as.numeric(x);paste(f(x*100),"\\%",sep='')}
 theme_set(theme_bw())
 r <- readRDS('remembr.RDS')
 attach(r)
-r2 <- readRDS('remember_irr.RDS')
-attach(r2)
 r3 <- readRDS('remember_grid_sweep.RDS')
 attach(r3)
 
@@ -51,5 +49,3 @@ m.sizes <- unlist(example_1_jobs$m)
 sim2.Bx <- as.numeric(example_4_jobs$Bxy)
 sim2.Bz <- as.numeric(example_4_jobs$Bzy)
 sim1.z.sd <- 0.5
-irr.coder.accuracy <- unlist(example_5_jobs$coder_accuracy)
-med.loco.accuracy <-  unlist(example.5$med.loco.acc)