Re: [Rd] Use of htest class for different tests

From: Martin Maechler <>
Date: Mon 14 Mar 2005 - 12:57:16 GMT

>>>>> "Torsten" == Torsten Hothorn <> >>>>> on Mon, 14 Mar 2005 13:43:32 +0100 (CET) writes:

    Torsten> On Sun, 13 Mar 2005, Gorjanc Gregor wrote:
>> Hello!
>> First of all I must appologize if this has been raised
>> previously, but search provided by Robert King at the
>> University of Newcastle seems to be down these
>> days. Additionally let me know if such a question should
>> be sent to R-help.
>> I did a contribution to function hwe.hardy in package
>> 'gap' during the weekend. That functions performs
>> Hardy-Weinberg equilibrium test using MCMC. The return of
>> the function does not have classical components for htest
>> class so I was afcourse not successfull in using
>> it. However, I managed to copy and modify some part of
>> print.htest to accomplish the same task.
>> Now my question is what to do in such cases? Just copy
>> parts of print.htest and modify for each test or anything
>> else. Are such cases rare? If yes, then mentioned
>> approach is probably the easiest.

    Torsten> you can use print.htest directly for the components
    Torsten> which _are_ elements of objects of class `htest'
    Torsten> and provide your one print method for all
    Torsten> others. If your class `foo' (essentially) extends
    Torsten> `htest', a simple version of `' could by

   Torsten> <- function(x, ...) {
   Torsten>     # generate an object of class `htest'
   Torsten>     y <- x
   Torsten>     class(y) <- "htest"
   Torsten>     # maybe modify some thinks like y$method
   Torsten>     ...
   Torsten>     # print y using `print.htest' without copying code
   Torsten>     print(y)
   Torsten>     # and now print additional information
   Torsten>     cat(x$whatsoever)

   Torsten> }

and if you want to really `comply to standards' you should end your print method with


Martin Maechler, ETH Zurich mailing list Received on Tue Mar 15 00:04:07 2005

This archive was generated by hypermail 2.1.8 : Mon 24 Oct 2005 - 22:26:29 GMT