From Torsten.Hothorn at stat.uni-muenchen.de  Mon Sep 28 10:23:35 2009
From: Torsten.Hothorn at stat.uni-muenchen.de (Torsten Hothorn)
Date: Mon, 28 Sep 2009 10:23:35 +0200 (CEST)
Subject: [Rd] mboost_1.1-3  blackboost_fit (PR#13972)
In-Reply-To: <4ABF8A17.9020502@statistik.tu-dortmund.de>
References: <20090926091512.B7051282EF56@mail.pubhealth.ku.dk>
	<4ABF8A17.9020502@statistik.tu-dortmund.de>
Message-ID: <alpine.DEB.2.00.0909281022100.10903@artemis.stat.uni-muenchen.de>



On Sun, 27 Sep 2009, Uwe Ligges wrote:

> 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).
>

Ivan,

   bd <- party:::ctreedpp(y ~ ., data = dt, weights = NULL)

will do the job, however, not very nicely. mboost version 2.0-0 
(available from R-forge) can do better.

Best wishes,

Torsten



> 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)
Torsten Hothorn