Implementation of S3 method for rlm class

[rlm](http://stat.ethz.ch/R-manual/R-patched/library/MASS/html/rlm.html)
**Basic example**
```
require(MASS)
x <- rlm(stack.loss ~ ., stackloss, psi = psi.hampel, init = "lts")
pander(x)
y <- rlm(stack.loss ~ ., stackloss, psi = psi.bisquare)
pander(y)
```