diff --git a/R/theme_apa.R b/R/theme_apa.R
index da0d94ef..5f7d854f 100644
--- a/R/theme_apa.R
+++ b/R/theme_apa.R
@@ -57,9 +57,9 @@
 #'   such situations.
 #'
 #'   This theme was created with inspiration from Rudolf Cardinal's
-#'   \href{http://egret.psychol.cam.ac.uk/statistics/R/graphs2.html}{code}, which
-#'   required updating for newer versions of \code{ggplot2} and adaptations for
-#'   APA style.
+#'   \href{https://web.archive.org/web/20220616072522/http://egret.psychol.cam.ac.uk/statistics/R/graphs2.html}{code}, 
+#'   which required updating for newer versions of \code{ggplot2} and 
+#'   adaptations for APA style.
 #'
 #' @author Jacob Long \email{jacob.long@@sc.edu}
 #'
diff --git a/man/theme_apa.Rd b/man/theme_apa.Rd
index d6492a00..6d0dfb00 100644
--- a/man/theme_apa.Rd
+++ b/man/theme_apa.Rd
@@ -75,9 +75,9 @@ Facetting is supported, but APA guidelines are considerably less clear for
 such situations.
 
 This theme was created with inspiration from Rudolf Cardinal's
-\href{http://egret.psychol.cam.ac.uk/statistics/R/graphs2.html}{code}, which
-required updating for newer versions of \code{ggplot2} and adaptations for
-APA style.
+\href{https://web.archive.org/web/20220616072522/http://egret.psychol.cam.ac.uk/statistics/R/graphs2.html}{code},
+which required updating for newer versions of \code{ggplot2} and
+adaptations for APA style.
 }
 \examples{
 # Create plot with ggplot2