Displaying 1 result from an estimated 1 matches for "lencheck".
Did you mean:
leakcheck
2008 Mar 25
1
Error propagation
...stop("not a valid expression!")
if (!is.list(varList)) stop("values are not of type 'list'!")
type <- match.arg(type)
m <- match(all.vars(expr), names(varList))
if (any(is.na(m))) stop(paste("some variables do not match"))
lenCheck <- sapply(varList, function(x) length(x))
if (sum(lenCheck == 2) == length(varList) && type == "raw")
print("All list items of size 2. Are you sure this is raw data?")
varList <- varList[m]
BT <- NULL
COVALL <- 0
### Q1:...