Displaying 2 results from an estimated 2 matches for "resisqr".
Did you mean:
resilar
2012 Nov 16
2
R-Square in WLS
...ase?
xnam <-colnames(X) # colnames Design Matrix
fmla1 <- as.formula(paste("Y ~",paste(xnam, collapse= "+"),"-1",sep=""))
fitlm <- lm(formula=fmla1,data = data.frame(cbind(X,Y)))
ResiSqr <- (residuals(fitlm))*(residuals(fitlm))
fmla2 <- as.formula(paste("ResiSqr ~ ", paste(xnam, collapse=
"+"),"-1",sep=""))
fitResi <- lm(formula=fmla2,data = data.frame(cbind(x,ResiSqr))) # This fit
is to calculate the weights
bResi <- coef(fitResi...
2012 Nov 07
5
Calling R object from R function
Hi,
Can you please help me with this please?
What I am trying to do is call a vector from R function and used in the new
function
So I create 4 functions with these arguments
M11 <- function(TrainData,TestData,mdat,nsam) {
ls <- list()
I have few statments one of them is
vectx <- c(,1,2,3,4,5,6,6)
vectz <- c(12,34,5,6,78,9,90)
and then................
ls(vectx=vtecx,vectz=vectz)