Wrote two new functions, and added to vignette