[to merge with master] customize serialize/deserialize

Can you put all of this in a helper function in `utils.R` and just make this:

`if (is(object, 'tundraContainer') && is(object$output$model, 'xgb.Booster')) {
  object <- serialize_xgb_object(object)
}