diff --git a/src/library/ts/R/acf.R b/src/library/ts/R/acf.R
index be9aaae0b59..870b0d70c29 100644
--- a/src/library/ts/R/acf.R
+++ b/src/library/ts/R/acf.R
@@ -6,6 +6,7 @@ function (x, lag.max = NULL, plot = TRUE, type = c("correlation",
     if(type == "partial") {
         m <- match.call()
         m[[1]] <- as.name("pacf")
+        m$type <- NULL
         return(eval(m, sys.frame(sys.parent())))
     }
     series <- deparse(substitute(x))
diff --git a/src/library/ts/man/beaver1.Rd b/src/library/ts/man/beaver1.Rd
index 3e9b85cd52a..8627f3254f0 100644
--- a/src/library/ts/man/beaver1.Rd
+++ b/src/library/ts/man/beaver1.Rd
@@ -6,6 +6,7 @@
 \title{
 Body Temperature Series of Beaver 1
 }
+\usage{data(beavers)}
 \description{
 The \code{beaver1} data frame has 114 rows and 4 columns on body
 temperature measurements at 10 minute intervals.
diff --git a/src/library/ts/man/beaver2.Rd b/src/library/ts/man/beaver2.Rd
index f77bf0325d2..99662e2e1f2 100644
--- a/src/library/ts/man/beaver2.Rd
+++ b/src/library/ts/man/beaver2.Rd
@@ -6,6 +6,7 @@
 \title{
 Body Temperature Series of Beaver 2
 }
+\usage{data(beavers)}
 \description{
 The \code{beaver2} data frame has 100 rows and 4 columns on body
 temperature measurements at 10 minute intervals.