search for: fkt

Hi volks, i have a question about the step() fkt. Is there a possibility to save the last model generated from this method. I have a loop and so i generate 100 different models with the step fkt and i want to know which model is the most common. CODE: ... missStep -> numeric(100) for (j in 1:100) { trainindex <- sample(c(1:462),300)...

Hello at all, working with a dataset I try to optimize a non-linear function with constraint. test<-read.csv2("C:/Users/Herb/Desktop/Opti/NORM.csv") fkt<- function(x){ a<-c(0) s<-c(0) #Minimizing square error for(j in 1:107){ s<-(test[j,2] - (x[1] * test[j,3]) - (x[2] * test[j,4]) - (x[3]*test[j,5]) - (x[4]*test[j,6]) - (x[5]*test[j,7]))^2 a<- a+s} a<-as.double(a) return(a)} constrOptim(c(0,0,0.5,0,0.5), fkt, NULL, ui=rbind(c(1,1...

...--------- #start estimates startingEstimates = rep(1/9, 9) matrixStartingEstimates = matrix(startingEstimates, nrow=1, ncol=9, byrow=TRUE) matrixStartingEstimatesNegativ = matrix(rep(-1/9, 9), nrow=1, ncol=9, byrow=TRUE) #The function which should be minimized x <- matrixStartingEstimates fkt <- function(x) {t(x) %*% covarianceMatrix %*% x} #The constraints #The results should be greater 0 !DOES NOT WORK! constraint1 <- x[1:9] #The summ of the results should be between 0.999 and 1.001 constraint2 <- sum(matrixStartingEstimatesNegativ) constraint3 &...

...he results dramatic! What recommendation can somebody give me, when i use nominal-variables(recode to 0/1 variables) with 6 point ordinal-variables. Is it better toDo a z-transformation with the ordinal variables , or should i recode this values in 0/1 binaries, too! P.S. Which is a good cluster fkt. in R ? Thanks for Advance _______________________________________________________________________ -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html Send "info", "he...