Ryan's Q Post-Hoc for ANOVA

I'm using lm to run an ANOVA, and would like to use Ryan's Q as my 
post-hoc (as recommended by Day and Quinn, 1989, Ecological 
Monographs).  I can't seem to find any methods in the base stats 
package that implement this post-hoc.  Is there a good package of 
post-hoc methods out there, or has someone written a method for Ryan's 
Q previously?

Thanks!

-Jarrett