Running examples in ‘quint-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: quint
> ### Title: Qualitative Interaction Trees
> ### Aliases: quint
> ### Keywords: cluster tree
> 
> ### ** Examples
> 
> #EXAMPLE with data from the Breast Cancer Recovery Project
> data(bcrp)
> #Start with expliciting the model for quint
> #The outcome Y is a change score between timepoint 3 and timepoint 1
> #A positive Y value indicates an improvement in depression (i.e., a decrease)
> 
> formula1<- I(cesdt1-cesdt3)~cond | nationality+marital+wcht1+age+
+   trext+comorbid+disopt1+uncomt1+negsoct1
> 
> #Perform a quint analysis
> #The BCRP data contain 3 conditions. Quint only works now for 2 conditions.
> #For the example, we disregard the control condition
> #To save computation time, we also adjust the control parameters
> 
> set.seed(2)
> control1<-quint.control(maxl=5,B=2) #The recommended number of bootstraps is 25.
> quint1<-quint(formula1, data= subset(bcrp,cond<3),control=control1)
Treatment variable (T) equals 1 corresponds to cond = 1 
Treatment variable (T) equals 2 corresponds to cond = 2 
The sample size in the analysis is 148 
split 1 
#leaves is 2 
Bootstrap sample  1 
Bootstrap sample  2 
current value of C 2.508878 
split 2 
#leaves is 3 
Bootstrap sample  1 
Bootstrap sample  2 
current value of C 2.662751 
split 3 
#leaves is 4 
Bootstrap sample  1 
Bootstrap sample  2 
current value of C 2.782163 
split 4 
#leaves is 5 
Bootstrap sample  1 
Bootstrap sample  2 
> quint1pr<-prune(quint1)
The sample size in the analysis is 148 
split 1 
#leaves is 2 
current value of C 2.508878 
split 2 
#leaves is 3 
current value of C 2.662751 
split 3 
#leaves is 4 
> 
> #Inspect the main results of the analysis:
> summary(quint1pr)
Partitioning criterion: Effect size criterion 
 
Fit information: 
               Criterion 
                - - - - 
 split #leaves apparent biascorrected   se
     1       2     2.51          2.35 0.04
     2       3     2.66          2.50 0.02
     3       4     2.78          2.60 0.00

Split information: 
        parentnode childnodes splittingvar splitpoint
Split 1          1        2,3      disopt1      18.50
Split 2          2        4,5     negsoct1       5.50
Split 3          5      10,11        trext      -0.76

Leaf information: 
       #(T=1) meanY|T=1 SD|T=1 #(T=2) meanY|T=2 SD|T=2     d   se class
Leaf 1     11      1.00   3.10      7      3.71   4.75 -0.71 0.54     2
Leaf 2     14      4.07   4.55      8     -5.50   4.84  2.06 0.59     1
Leaf 3     34      3.59   6.60     31      1.13   5.39  0.41 0.26     3
Leaf 4     19     -0.32   4.41     24      1.25   2.69 -0.44 0.32     2
> 
> #plot the tree
> plot(quint1pr)
Error in unit(1, "strwidth", split) : 
  no string supplied for 'strwidth/height' unit
Calls: plot ... edge_panel -> grid.rect -> rectGrob -> is.unit -> unit
Execution halted