I need R code for the bootstrap to estimate the standard err

I need R code for the bootstrap to estimate the standard error of and a confidence interval for (X_A-bar) (X_B-bar). Suppose that the number of bootstrap replicates is 1000.

with

A = c(79.98, 80.04,80.02,80.04, 80.03, 80.03, 80.04, 79.97, 80.05,80.03, 80.02,80.00, 80.02)

B = c(80.02, 79.94, 79.98, 79.97, 79.97, 80.03, 79.95, 79.97)

Solution