The following code fails to train a nnet model in a random dataset using
caret:

nR <- 700
nCol <- 2000
  myCtrl <- trainControl(method="cv", number=3, preProcOptions=NULL,
classProbs = TRUE, summaryFunction = twoClassSummary)
  trX <- data.frame(replicate(nR, rnorm(nCol)))
  trY <- runif(1)*trX[,1]*trX[,2]^2+runif(1)*trX[,3]/trX[,4]
  trY <- as.factor(ifelse(sign(trY)>0,'X1','X0'))
  my.grid <- createGrid(method.name, grid.len, data=trX)
  my.model <- train(trX,trY,method=method.name,trace=FALSE,trControl=myCtrl,tuneGrid=my.grid,
metric="ROC")
  print("Done")

The error I get is:
task 2 failed - "arguments imply differing number of rows: 1334, 666"

However, everything works if I reduce nR to, say 20.

Any thoughts on what may be causing this? Is there a place where I could
report this bug other than this mailing list?

Here is my session info:
> sessionInfo()
R version 2.15.2 (2012-10-26)
Platform: x86_64-unknown-linux-gnu (64-bit)

locale:
[1] C

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

other attached packages:
[1] nnet_7.3-5      pROC_1.5.4      caret_5.15-052  foreach_1.4.0
[5] cluster_1.14.3  plyr_1.8        reshape2_1.2.2  lattice_0.20-13

loaded via a namespace (and not attached):
[1] codetools_0.2-8 compiler_2.15.2 grid_2.15.2     iterators_1.0.6
[5] stringr_0.6.2   tools_2.15.2

Thanks,

James

	[[alternative HTML version deleted]]

