What would be the code using RStudios with the package "boot" for an example like this?

Does the Paleo Diet work? Researchers randomly followed 19 volunteers who spent 6 months on the Paleo diet, and their weight gain/loss was tracked. The data is given below. The researchers suspect non-normality, and also suspect there may be outliers, so want to use the median as their measure of centrality. Using bootstrap, with R = 5e4 replicates and set.seed(142), to estimate the Standard Error of the median of this data set.

dat <- c(3, 2, 7.1, 2.7, 2.3, 1.7, 3.2, 3, 2.5, 1.8, 3.2, 2.3, 5.8, 2.4, 4, 3.9, 2.6, 1.1, 3.4)

The Standard Error for Median(dat):