Displaying 7 results from an estimated 7 matches for "myctrl".
Did you mean:
mycrl
2013 Feb 10
1
Training with very few positives
...in 10,000 examples (0.2%)
What is an appropriate cross validation scheme for training a classifier
with very few positives?
I currently have the following setup:
========================================
library(caret)
tmp <- createDataPartition(Y, p = 9/10, times = 3, list = TRUE)
myCtrl <- trainControl(method = "boot", index = tmp, timingSamps = 2,
classProbs = TRUE, summaryFunction = twoClassSummary)
RFmodel <- train(X,Y,method='rf',trControl=myCtrl,tuneLength=1,
metric="ROC")
SVMmodel <- train(X,Y,method='svmRadial',trControl...
2013 Mar 06
1
CARET and NNET fail to train a model when the input is high dimensional
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',...
2013 Feb 07
4
Sourcing my file does not print command outputs
I looked at the documentation of source() and summary(), and I could not
find the reason why calling something like:
> summary(resamps)
from the command line, works (it prints the summary)
whereas calling
summary(resampls)
from a file that I source with source("my_file.r") does not print anything.
How can I get summary(resamps) to print when I source a file with this
command?
2013 Feb 07
0
FW: Sourcing my file does not print command outputs
...uct Y using X
Y <- runif(1)*X[,1]*X[,2]^2+runif(1)*X[,3]/X[,4]
#Convert Y to binary
Y <- as.factor(ifelse(sign(Y)>0,'X1','X0'))
#Create bootstrap samples for fitting models
library(caret)
print("Creating bootstrap samples")
tmp <- createResample(Y,times = 25)
myCtrl <- trainControl(method = "boot", index = tmp, timingSamps = 10)
RFmodel <- train(X,Y,method='rf',trControl=myCtrl,tuneLength=1)
NNmodel <- train(X,Y,method='nnet',trControl=myCtrl,tuneLength=3, trace = FALSE)
## GLMnet = GLMmodel,
...
#Assess...
2013 Feb 07
1
Saving model and other objects from caret
Say I train a model in caret, e.g.:
RFmodel <- train(X,Y,method='rf',trControl=myCtrl,tuneLength=1)
How can I save this to disk and load it later in R?
How about an object of the class "resamples"?
resamps <- resamples(
list( RF = RFmodel,
SVM = SVMmodel,
KNN = KNNmodel,
NN = NNmodel
))
Thanks...
2008 Feb 09
0
Action with multiple parameters
Hello all!
I would like to delete multiple records on a single call. Something
similar to the following line.
new Ajax.Request(''/myctrl/delete/1,2,3,4,5'', {asynchronous:true,
evalScripts:true});
However, I don''t know how to pass multiple parameters to one action
(in a AJAX call). Is it possible? How could I do that?
In other words, I want the Delete action to take multiple parameters.
Something like that : contr...
2004 Jun 11
9
Handling Events that don''t take an ID
...icular widget to respond to an
event which doesn''t take an ID as an argument (like evt_size or
evt_left_down), that I have to inherit a new widget and define the event
handler within the inherited class? Here''s a little contrived code example
to illustrate what I mean:
class MyCtrl < Wx::TextCtrl
def initialize()
evt_size {|event| on_size(event)}
end
def on_size(event)
# Do whatever
end
end
Or is there a simpler, more direct way to get a particular instance of a
widget to respond to such events?
Robert Carlin
_______________________________________...