Displaying 7 results from an estimated 7 matches for "nxl".
Did you mean:
nil
2014 Jan 03
1
Tab formatting in dummy.coef.R
...err]
int <- attr(Terms, "intercept")
facs <- attr(Terms, "factors")[-c(1,1+err), -err, drop=FALSE]
vars <- rownames(facs)
xl <- attr(object, "xlevels")
if(!length(xl)) { # no factors in model
return(as.list(coef(object)))
}
nxl <- setNames(rep.int(1, length(vars)), vars)
tmp <- unlist(lapply(xl, length))
nxl[names(tmp)] <- tmp
lterms <- apply(facs, 2L, function(x) prod(nxl[x > 0]))
nl <- sum(lterms)
args <- setNames(vector("list", length(vars)), vars)
for(i in vars)...
2003 Mar 26
5
predict (PR#2686)
...(s) earwig
A cure for this seems to be to add the commented line below towards the end
of `model.frame.default':
<<...>>
if (length(xlev) > 0) {
for (nm in names(xlev)) if (!is.null(xl <- xlev[[nm]])) {
xi <- data[[nm]]
if (is.null(nxl <- levels(xi)))
warning(paste("variable", nm, "is not a factor"))
else {
xi <- xi[, drop = TRUE]
nxl <- levels( xi) # MVB: remove droppees
if (any(m <- is.na(match(nxl, xl))))...
1997 May 11
2
R-alpha: Logarithmic scales
...}
2) rect() does not work either. Unfortunately, do_rect() in "plot.c"
overrides the yt() function... What about this (lines 983-1031):
SEXP do_rect(SEXP call, SEXP op, SEXP args, SEXP env)
{
SEXP sxl, sxr, syb, sys, col, lty, border;
double *xl, *xr, *yb, *ys;
int i, n, nxl, nxr, nyb, nys;
int ncol, nlty, nborder;
int colsave, ltysave;
GCheckState();
if(length(args) < 4) errorcall(call, "too few arguments\n");
xypoints(call, args, &n);
sxl = CAR(args); nxl = length(sxl); args = CDR(args);
syb = CAR(args); nyb = length(sy...
2002 Jan 22
0
lm/model.frame.default surgery: Am I doing something crazy?
...rame (a consequence of na.action=na.omit).
If I now call predict with the full data frame, error occurs in these cases
with the message
that there is a new factor level was encountered.
This message originates from model.frame.default in the section:
if (any(m <- is.na(match(nxl, xl))))
stop(paste("factor", nm, "has new level(s)",
nxl[m]))
On first sight, this behavior is logical. Something is likely wrong if
someone submits newdata with factor levels which
did not contribute to the fitting. I
n my case, however...
2001 Jun 21
0
factors in model.frame.default
...uot;blutdruck" and "familie" are factors.
The warnings are given from the following lines in model.frame.default:
if(length(xlev) > 0) {
for(nm in names(xlev))
if(!is.null(xl <- xlev[[nm]])) {
xi <- data[[nm]]
if(is.null(nxl <- levels(xi)))
warning(paste("variable", nm, "is not a factor"))
where
Browse[1]> xlev
$"67"
[1] "M" "W" <- variable "sex"
$"70"
[1] "Ja" "Nein" <- variable "famil...
2008 Jun 30
4
Rebuild of kernel 2.6.9-67.0.20.EL failure
Hello list.
I'm trying to rebuild the 2.6.9.67.0.20.EL kernel, but it fails even without
modifications.
How did I try it?
Created a (non-root) build environment (not a mock )
Installed the kernel.scr.rpm and did a
rpmbuild -ba --target=`uname -m` kernel-2.6.spec 2> prep-err.log | tee
prep-out.log
The build failed at the end:
Processing files: kernel-xenU-devel-2.6.9-67.0.20.EL
Checking
2009 Jul 23
1
[PATCH server] changes required for fedora rawhide inclusion.
...MOG>wkud^7NfbjdS at 7%FV
zV}<jpqu(t(Nt=CcTo(L?iuy+AzBped&1^TC+2%L<5#w{mSK^LuiJ2|A!m$FD%{LS2
z$t~nJe)}b|gokLa8tiGdpxtqGhci6M=07czbY${ewBTCA+HB;TKKGd$KsJs!GOsik
z(^CWImrw|XCY)+nFUuhEN;6E2>04nW63RCHxI{%ykvx5^n$qo&mG~;9XJHM{>^_r+
zlW>#7vygQnj&ARb=4RWHNVrXk9f0gl_~KK9X;cxB9$}NXlXvV+$RRXb*j0x-7NS5_
z0GUZ%7PoGdm_ICTv+ at K>V<&cDTZ-lR7enS&!VNyL&}HqJqG;j~Ju`8jLKoX59g%Id
z?R-s_i<whH38dJQ2kR^yTPL{*FA8F- at 0$O)xug<Vjg%<(t?LoNke1ldaErJPRIpWj
zf;H0F9Ucq~Ev&6=@tYq%4AU3r?XAtMsH?6`8nW1LO}^Z4U2SbJ6iKQ)?DoW62{_Pm
z`K`zy?DGJ`GHgm0o6^L3CQ^qb)g5k5|0*v|5SPZiC...