Amazing R debugging

debug.R

> methods(median)
[1] median.default
> methods(class = 'factor')
 [1] [.factor             [[.factor            [[<-.factor          [<-.factor           all.equal.factor     as.character.factor  as.data.frame.factor as.Date.factor       as.list.factor
[10] as.logical.factor    as.POSIXlt.factor    as.quoted.factor*    as.vector.factor     droplevels.factor    format.factor        is.na<-.factor       length<-.factor      levels<-.factor
[19] Math.factor          Ops.factor           plot.factor*         print.factor         relevel.factor*      relist.factor*       rep.factor           summary.factor       Summary.factor
[28] xtfrm.factor

   Non-visible functions are asterisked
> trace(run_model, edit = TRUE)
Tracing function "run_model" in package "syberia"
[1] "run_model"
>

getS3method('median','default')