Commit 72167fe2 authored by houyun's avatar houyun
Browse files

add custom example

parent ecdf54f0
Loading
Loading
Loading
Loading
+2 −0
Original line number Diff line number Diff line


#' @noRd
.pairs_tbl <- function(data,
                       data2 = NULL,
+2 −0
Original line number Diff line number Diff line
@@ -24,6 +24,8 @@
#' m <- marker(c("square", "circle", "star", "heart"))
#' m[1:3]
#' rep_len(m, 10)
#' library(grid)
#' marker(circleGrob())
marker <- function(x, ...) {
  UseMethod("marker")
}
+2 −0
Original line number Diff line number Diff line
@@ -127,6 +127,8 @@ marker(c("square", "circle"))
m <- marker(c("square", "circle", "star", "heart"))
m[1:3]
rep_len(m, 10)
library(grid)
marker(circleGrob())
}
\author{
Hou Yun