Here you can show uses worked up examples for your package. The easiest way to make a new package is to use usethis::use_vignette("nameofvignette")
.
require(stats)
x <- runif(10)
y <- 10 + 3*x + rnorm(10)
sampleplot(x, y)
## (Intercept) x
## 9.370303 4.214447
title(samplefunction("x versus y", y="10 vals", z="green"))