Displaying 1 result from an estimated 1 matches for "betasav".
Did you mean:
betasave
2012 Aug 05
1
trouble with looping for effect of sampling interval increase
...e values
IntervalLowerQ <- rbind (IntervalLowerQ , Q[2])
IntervalUpperQ <- rbind (IntervalUpperQ , Q[4])
IntervalSkew <- rbind (IntervalSkew , BSkew)
IntervalMean <- rbind (IntervalMean , BMean)
IntervalMedian <- rbind (IntervalMedian , BMedian)
#Store the Betas
#This is a pain
BetaSave <- Betas
no.r <- nrow(IntervalBetas)
l.v <- length(BetaSave)
difer <- no.r - l.v
difers <- abs(difer)
if (no.r < l.v){
IntervalBetas <- rbind(IntervalBetas,rep(NA,difers))
}
else {
(BetaSave <- rbind(BetaSave,rep(NA,difers)))
}
IntervalBetas <- cbind (IntervalBetas, B...