[Rd] delete.response() incorrectly handles terms-objects without (PR#1326)

ripley@stats.ox.ac.uk ripley@stats.ox.ac.uk
Mon, 25 Feb 2002 15:38:44 +0100 (MET)


Thanks, fixed now.

Why were you calling delete.response on an object with no response, BTW?
I wonder whether delete.response should not be a no-op in that case (it is
in S), if there is any reason to handle it at all.

On Mon, 25 Feb 2002 meyer@ci.tuwien.ac.at wrote:

> if the terms-object contains no response, delete.response mutilates the
> predvars-attribute in the line:
>
> attr(tt, "predvars") <- attr(termobj, "predvars")[-2]
>
> which should probably changed to:
>
>     if (length(f) == 3)
> 	attr(tt, "predvars") <- attr(termobj, "predvars")[-2]
>
> <<insert bug report here>>
>
>
>
> --please do not edit the information below--
>
> Version:
>  platform = i686-pc-linux-gnu
>  arch = i686
>  os = linux-gnu
>  system = i686, linux-gnu
>  status = Under development (unstable)
>  major = 1
>  minor = 5.0
>  year = 2002
>  month = 02
>  day = 24
>  language = R
>
> Search Path:
>  .GlobalEnv, X, iris, package:e1071, package:ctest, Autoloads, package:base
>
> -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
> r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
> Send "info", "help", or "[un]subscribe"
> (in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
> _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
>

-- 
Brian D. Ripley,                  ripley@stats.ox.ac.uk
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272860 (secr)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595


-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._