Test markdown TMV4

Prueba de grafico

22222222

print(res)

## Size (n)  Missing  Minimum   1st Qu     Mean   Median   TrMean   3rd Qu 
##   11.000    0.000    0.000    0.000   39.609    4.000   25.603    0.000 
##     Max.   Stdev.     Var.  SE Mean   I.Q.R.    Range Kurtosis Skewness 
##  472.000   84.208 7090.974   25.390    0.000  472.000    8.201    2.861 
## SW p-val 
##    0.000

library(DT)
datatable(mtcars,filter = 'top',
          extensions = 'Buttons', options = list(
    dom = 'Bfrtip',
    buttons = c('copy', 'csv', 'excel', 'pdf', 'print')
  ))