# NOT RUN {
set.seed(5678)
x = rbind(
cbind(rvar(rnorm(1000, 1)), rvar(rnorm(1000, 2))),
cbind(rvar(rnorm(1000, 3)), rvar(rnorm(1000, 4)))
)
print(x)
print(x, summary = "median_mad")
str(x)
format(x)
# }
Run the code above in your browser using DataLab