diff --git a/Pre-fork-BCH-BTC-Spending/create-plots.R b/Pre-fork-BCH-BTC-Spending/create-plots.R
index 85f8cff..b633f3b 100644
--- a/Pre-fork-BCH-BTC-Spending/create-plots.R
+++ b/Pre-fork-BCH-BTC-Spending/create-plots.R
@@ -63,14 +63,14 @@ spent.status.by.day.value.reshaped[, variable :=
 spent.status.by.day.outputs.reshaped <- melt(spent.status.by.day[, 
   .(block_time.date, outputs.btc.unspent.bch.unspent, outputs.btc.spent.bch.unspent,
     outputs.btc.unspent.bch.spent, outputs.btc.spent.bch.spent)], id.vars = c("block_time.date"),
-  measure.vars = c("outputs.btc.unspent.bch.unspent", "outputs.btc.spent.bch.unspent",
-    "outputs.btc.unspent.bch.spent", "outputs.btc.spent.bch.spent"))
+  measure.vars = c("outputs.btc.unspent.bch.unspent", "outputs.btc.unspent.bch.spent",
+    "outputs.btc.spent.bch.unspent", "outputs.btc.spent.bch.spent"))
 
 
 spent.status.by.day.outputs.reshaped[, block_time.date := as.POSIXct(block_time.date)]
 spent.status.by.day.outputs.reshaped[, variable := 
-    factor(variable, levels = c("outputs.btc.unspent.bch.unspent", "outputs.btc.spent.bch.unspent",
-      "outputs.btc.unspent.bch.spent", "outputs.btc.spent.bch.spent"))]
+    factor(variable, levels = c("outputs.btc.unspent.bch.unspent", "outputs.btc.unspent.bch.spent",
+      "outputs.btc.spent.bch.unspent", "outputs.btc.spent.bch.spent"))]