From dfc93636e5a19784d927ab802e76481c83d3b396 Mon Sep 17 00:00:00 2001
From: DominikVogel <post@vogel-online.info>
Date: Tue, 11 Dec 2018 09:52:41 +0100
Subject: [PATCH] fix typo in contour.lm.Rd

---
 man/contour.lm.Rd | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/man/contour.lm.Rd b/man/contour.lm.Rd
index 01cb13f..5cc1f5a 100644
--- a/man/contour.lm.Rd
+++ b/man/contour.lm.Rd
@@ -122,7 +122,7 @@ Lenth RV (2009) ``Response-Surface Methods in R, Using rsm'',
 \seealso{\code{\link{contour}}}
 \examples{
 ### Basic example with a linear model:
-mpg.lm <- lm((mpg ~ poly(hp, disp, degree = 3), data = mtcars)
+mpg.lm <- lm(mpg ~ poly(hp, disp, degree = 3), data = mtcars)
 contour(mpg.lm, hp ~ disp, image = TRUE)
 
 ### Extended example with an rsm model...