search for: rentabilidade

...eturn values between 0 and 1. What is wrong???? The functions is given by: adjustedR2<-function(Y,X,saM) { if(is.matrix(Y)==F) (Y<-as.matrix(Y)) if(is.matrix(X)==F) (X<-as.matrix(X)) if(is.matrix(saM)==F) (saM<-as.matrix(saM)) RX<-rent.matrix(X,1)$Rentabilidade.tipo RY<-rent.matrix(Y,1)$Rentabilidade.tipo r2m<-matrix(0,nrow=ncol(Y),ncol=1) RSS<-matrix(0,ncol=ncol(Y),nrow=1) SYY<-matrix(0,ncol=ncol(Y),nrow=1) for (i in 1:ncol(RY)) { RSS[,i]<-(t(RY[,i])%*%RY[,i])-(saM[i,]%*%(t(RX)%*%RX)%*%t(saM)[,i]) SYY[,i]<-...

...return values between 0 and 1. What is wrong???? The functions is given by: adjustedR2<-function(Y,X,saM) { if(is.matrix(Y)==F) (Y<-as.matrix(Y)) if(is.matrix(X)==F) (X<-as.matrix(X)) if(is.matrix(saM)==F) (saM<-as.matrix(saM)) RX<-rent.matrix(X,1)$Rentabilidade.tipo RY<-rent.matrix(Y,1)$Rentabilidade.tipo r2m<-matrix(0,nrow=ncol(Y),ncol=1) RSS<-matrix(0,ncol=ncol(Y),nrow=1) SYY<-matrix(0,ncol=ncol(Y),nrow=1) for (i in 1:ncol(RY)) { RSS[,i]<-(t(RY[,i])%*%RY[,i])-(saM[i,]%*%(t(RX)%*%RX)%*%t(saM)[,i]) SY...

Hola, Por si os interesa asistir y podéis asistir: http://madrid.r-es.org/35-jueves-12-de-mayo-2016/ Gracias, Carlos Ortega www.qualityexcellence.es [[alternative HTML version deleted]]

Hola muy buenas tardes. Reciba un c?lido saludo y esta cordial invitaci?n a participar a nuestro Seminario Online: ?Las 7 Reglas de Oro del control de Inventarios? con 8 horas de capacitaci?n efectiva que ser? celebrado el d?a Lunes 20 de Marzo, en horario de 9:00 am a 6:30 pm. ?Por qu? Inscribirse? Convierta su departamento en un factor de crecimiento y desarrollo para lograr el ?xito de la