diff --git a/R/ggplotJrnoldPalettes.R b/R/ggplotJrnoldPalettes.R
index 81525c1d..d06f9e50 100644
--- a/R/ggplotJrnoldPalettes.R
+++ b/R/ggplotJrnoldPalettes.R
@@ -61,7 +61,9 @@ ggplotJrnoldPalettes <- {
     ## bg : d5e4eb
     ## bgdk : c3d6df
     x$economist$bg <-
-        c(ebg = "#d5e4eb", edkbg = "#c3d6df")
+        c(ebg = "#d5e4eb", # Bluish gray
+          edkbg = "#c3d6df", # Darker bluish-gray
+          red = "#ed111a", # Bright red rectangle and highlights)
     ## From png 20120818_AMC820.png
     ## blue_gray = 6794a7
     ## blue_dark = 014d64