From ligges at statistik.tu-dortmund.de  Sun Sep 27 17:51:51 2009
From: ligges at statistik.tu-dortmund.de (Uwe Ligges)
Date: Sun, 27 Sep 2009 17:51:51 +0200
Subject: [Rd] mboost_1.1-3  blackboost_fit (PR#13972)
In-Reply-To: <20090926091512.B7051282EF56@mail.pubhealth.ku.dk>
References: <20090926091512.B7051282EF56@mail.pubhealth.ku.dk>
Message-ID: <4ABF8A17.9020502@statistik.tu-dortmund.de>

Please read the FAQs about submitting bug reports. Bugs in contributed 
packages must not go to the R-bugs repository but to the corresponding 
package maintainer, CCing in this case (I do not confirmed that it is a 
bug).

Best,
Uwe Ligges




bullshit at mail.ru wrote:
> Full_Name: Ivan the Terrible
> Version: 2.9.2
> OS: Windows XP SP3
> Submission from: (NULL) (89.110.13.151)
> 
> 
> When using the method blackboost_fit of the package mboost appear following
> error :
> Error in party:::get_variables(obj at responses) : 
>   trying to get slot "responses" from an object (class "boost_data") that is not
> an S4 object
> 
> Simple test case that produce bug:
> 
> dt=expand.grid(y=c(2,3,4), x1=c(1,2), x2=c(1,2))
> library(mboost)
> bd=boost_dpp(y ~ .,data=dt, weights = NULL)
> blackboost_fit(bd, 
>                tree_controls = ctree_control(
>                                              teststat     = "max",
>                                              testtype     = "Teststatistic",
>                                              mincriterion = 0,
>                                              maxdepth     = 2
>                                             ),
>                fitmem = ctree_memory(
>                                      bd, 
>                                      TRUE
>                                     ), 
>                family = GaussReg(),
>                control = boost_control(
>                                        mstop = 2
>                                       ), 
>                weights = NULL
>               )
> 
> 
> Test case session on my computer:
> 
>> dt=expand.grid(y=c(2,3,4), x1=c(1,2), x2=c(1,2))
>> library(mboost)
> Loading required package: modeltools
> Loading required package: stats4
> Loading required package: party
> Loading required package: survival
> Loading required package: splines
> Loading required package: grid
> Loading required package: coin
> Loading required package: mvtnorm
> Loading required package: zoo
> 
> Attaching package: 'zoo'
> 
> 
>         The following object(s) are masked from package:base :
> 
>          as.Date.numeric 
> 
> Loading required package: sandwich
> Loading required package: strucchange
> Loading required package: vcd
> Loading required package: MASS
> Loading required package: colorspace
>> bd=boost_dpp(y ~ .,data=dt, weights = NULL)
>> blackboost_fit(bd, 
> +                tree_controls = ctree_control(
> +                                              teststat     = "max",
> +                                              testtype     = "Teststatistic",
> +                                              mincriterion = 0,
> +                                              maxdepth     = 2
> +                                             ),
> +                fitmem = ctree_memory(
> +                                      bd, 
> +                                      TRUE
> +                                     ), 
> +                family = GaussReg(),
> +                control = boost_control(
> +                                        mstop = 2
> +                                       ), 
> +                weights = NULL
> +               )
> Error in party:::get_variables(obj at responses) : 
>   trying to get slot "responses" from an object (class "boost_data") that is not
> an S4 object 
>> sessionInfo()
> R version 2.9.2 (2009-08-24) 
> i386-pc-mingw32 
> 
> locale:
> LC_COLLATE=Russian_Russia.1251;LC_CTYPE=Russian_Russia.1251;LC_MONETARY=Russian_Russia.1251;LC_NUMERIC=C;LC_TIME=Russian_Russia.1251
> 
> attached base packages:
> [1] grid      splines   stats     graphics  grDevices utils     datasets 
> methods   base     
> 
> other attached packages:
>  [1] mboost_1.1-3      party_0.9-999     vcd_1.2-4         colorspace_1.0-1 
> MASS_7.2-48       strucchange_1.3-7
>  [7] sandwich_2.2-1    zoo_1.5-8         coin_1.0-6        mvtnorm_0.9-7    
> survival_2.35-4   modeltools_0.2-16
> 
> loaded via a namespace (and not attached):
> [1] lattice_0.17-25 stats4_2.9.2   
> 
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel



[Rd] mboost_1.1-3 blackboost_fit (PR#13972)
Uwe Ligges