diff --git a/R/col2.R b/R/col2.R
new file mode 100644
index 0000000..d56cff7
--- /dev/null
+++ b/R/col2.R
@@ -0,0 +1,3 @@
+col2 <- colorRampPalette(rev(c("#67001F", "#B2182B", "#D6604D", "#F4A582",
+                               "#FDDBC7", "#FFFFFF", "#D1E5F0", "#92C5DE",
+                               "#4393C3", "#2166AC", "#053061")))
diff --git a/man/col2.Rd b/man/col2.Rd
new file mode 100644
index 0000000..efa3a77
--- /dev/null
+++ b/man/col2.Rd
@@ -0,0 +1,12 @@
+\name{col2}
+\alias{col2}
+\title{Col2}
+\usage{
+col2(n)
+}
+\description{
+Generates a palette of blue-white-red.
+}
+\examples{
+col2(100)
+}