replace slots in a S4 object
replace_slots(object, ...)
object
a S4 object
...
set of slot names to be replaced. This needs to be a named vector