## Not run: 
# #load(url("http://topepo.github.io/caret/exampleModels.RData"))
# 
# resamps <- resamples(list(CART = rpartFit,
#                           CondInfTree = ctreeFit,
#                           MARS = earthFit))
# difs <- diff(resamps)
# 
# dotplot(difs)
# 
# densityplot(difs,
#             metric = "RMSE",
#             auto.key = TRUE,
#             pch = "|")
# 
# bwplot(difs,
#        metric = "RMSE")
# 
# levelplot(difs, what = "differences")
# 
# ## End(Not run)
Run the code above in your browser using DataLab