Translate dplyr slice_sample function into base R

Question

Just a quick question: how to translate the dplyr function slice_sample into base R? Here is a toy dataset:

y <- rnorm(20)
x <- rnorm(20)
z