had to remove examples as I couldn't find the other 2 helper functions

R/panel_cor.R

@@ -10,10 +10,6 @@
 
 #' @seealso \code{\link{pairs}}
 #' @export
-#' @examples
-#' z <- matrix(rnorm(40), ncol = 4)
-#' pairs(z, upper.panel = panel_cor,
-#' lower.panel = panel_lines, diag.panel = panel_hist)
 
 panel_cor <- function(x, y) {
   par(usr = c(0, 1, 0, 1))

man/panel_cor.Rd

@@ -23,11 +23,6 @@ This and the other functions are utility functions for the pairs plot.
 the selected panels. \code{panel_lines} shows the regression line and
 \code{panel_hist} histograms.
 }
-\examples{
-z <- matrix(rnorm(40), ncol = 4)
-pairs(z, upper.panel = panel_cor,
-lower.panel = panel_lines, diag.panel = panel_hist)
-}
 \seealso{
 \code{\link{pairs}}
 }