Support for Afex anova objects

[willbowditch]

Afex objects aren't supported at the moment. I've got around this myself with a quick method function, but adding support for captions etc may be good for wider community.

Example:

require(afex)
require(pander)
data(md_12.1)

output<-
  aov_ez("id", "rt", md_12.1, within = c("angle", "noise"))


pander.afex_aov <- function(x, ...) {
  res <- as.data.frame(nice(x))
  pandoc.table(res)
}

pander(output)

returns:

---------------------------------------------------------
  Effect        df        MSE       F      ges   p.value 
----------- ----------- ------- --------- ----- ---------
   angle    1.92, 17.31 3702.02 40.72 ***  .39   <.0001  

   noise       1, 9     8460.00 33.77 ***  .39    .0003  

angle:noise 1.81, 16.27 1283.22 45.31 ***  .19   <.0001  
---------------------------------------------------------

[daroczig]

Can you please review this example? I'm not sure what is a.

[willbowditch]

@daroczig Corrected