Running examples in 'TDMR-Ex.R' failed
The error most likely occurred in:

> ### Name: tdmROCRbase
> ### Title: Single plot of ROC, lift or other chart for a 'TDMclassifier'
> ###   object.
> ### Aliases: tdmROCRbase
> 
> ### ** Examples
> 
> #*# --------- demo/demo05ROCR.r ---------
> #*# Run task SONAR with "area under ROC curve" as performance measure (rgain.type="arROC").
> #*# Other settings are similar to demo01-1sonar.r (level 1 of TDMR).
> #*# Finally, plot ROC curve for validataion data set and 
> #+#          plot lift chart for training data set
> #*#
>     path <- paste(find.package("TDMR"), "demo02sonar",sep="/");
>     #path <- paste("../inst", "demo02sonar",sep="/");
> 
>     source(paste(path,"main_sonar.r",sep="/"));    # defines readTrnSonar
> 
>     controlDM <- function() {
+       #
+       # settings for the DM process (former sonar_00.apd file): 
+       # (see ?tdmOptsDefaultsSet for a complete list of all default settings 
+       # and many explanatory comments)
+       #
+       opts = list(path = path,
+                   dir.data = "data",            # relative to path
+                   filename = "sonar.txt",
+                   READ.TrnFn = readTrnSonar,    # defined in main_sonar.r
+                   data.title = "Sonar Data",
+                   NRUN =  1,
+                   rgain.type = "arROC",
+                   VERBOSE = 2
+       );
+       opts <- setParams(opts, defaultOpts(), keepNotMatching = TRUE);
+     }
>     
>     opts <- controlDM();
>     result <- main_sonar(opts);     
sonar.txt : Read data ...
sonar.txt : Read data from sonar.txt ...
sonar.txt : 208 records read.
sonar.txt : Stratified random training-validation-index with opts$TST.valiFrac =  10 %

Warning in tdmClassify(d_train, d_test, d_dis, d_preproc, response.variables,  :
  Column Class  of d_train is not a factor >> we change it to factor!
sonar.txt : Importance check ...
Clipping sampsize to  187 
sonar.txt : Train RF (importance, sampsize= 187 ) ...
sonar.txt : Saving SRF (sorted RF) importance info on opts ...
Variables sorted by importance (60 ):
 [1] "V11" "V47" "V12" "V48" "V37" "V36" "V32" "V45" "V21" "V49" "V54" "V18"
[13] "V28" "V23" "V46" "V51" "V10" "V1"  "V13" "V44" "V9"  "V16" "V52" "V25"
[25] "V17" "V42" "V24" "V50" "V35" "V55" "V34" "V41" "V39" "V43" "V14" "V22"
[37] "V59" "V38" "V26" "V27" "V4"  "V20" "V2"  "V31" "V53" "V60" "V5"  "V3" 
[49] "V6"  "V58" "V30" "V56" "V29" "V8"  "V7"  "V19" "V15" "V40" "V33" "V57"
Dropped columns (14 [=  4.9% of total importance]):
 [1] "V5"  "V3"  "V6"  "V58" "V30" "V56" "V29" "V8"  "V7"  "V19" "V15" "V40"
[13] "V33" "V57"
Proc time:  0.04
dev.new(): using pdf(file="Rplots12.pdf")
dev.new(): using pdf(file="Rplots13.pdf")
Clipping sampsize to  187 
Run  1 / 1 :
sonar.txt : Train RF with sampsize = 187 ...
Proc time:  0.23 
sonar.txt : Apply RF ...
Proc time:  0.04 
sonar.txt : Calc confusion matrix + gain ...

Training cases ( 187 ):
      predicted
actual  M  R
     M 90 10
     R 20 67
total gain:   157.0 (is  83.957% of max. gain =   187.0)

Validation cases (20):
      predicted
actual  M  R
     M 11  0
     R  2  7
             M R Total
gain.vector 11 7    18
total gain :    18.0 (is  90.000% of max. gain =    20.0)
dev.new(): using pdf(file="Rplots14.pdf")
dev.new(): using pdf(file="Rplots15.pdf")

  Relative gain (arROC) on   training set    0.9362069 %
  Relative gain (arROC) on validation set    0.969697 %


Relative gain is "arROC"
Train OOB relative gain:   0.936   (on 187 records) 
  Vali    relative gain:   0.970   (on 20 records) 
 Vali2    relative gain (predict always with default cutoff):   0.048   (on 20 records) 

sonar.txt: All done.

>     
>     tdmGraphicNewWin(opts);
dev.new(): using pdf(file="Rplots16.pdf")
>     cat("Area under ROC-curve for validation data set: ",
+         tdmROCRbase(result),"\n");                                # side effect: plot ROC-curve
Error in as.double(y) : 
  cannot coerce type 'S4' to vector of type 'double'
Calls: cat ... <Anonymous> -> <Anonymous> -> plot.default -> xy.coords
Execution halted