The R Project SVN R

Rev

Rev 61776 | Rev 63155 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 61776 Rev 63096
Line 427... Line 427...
427
	for (j = jmin; j < jmax ; j++)
427
	for (j = jmin; j < jmax ; j++)
428
	    MatrixColumnLabel(cl, j, w[j]);
428
	    MatrixColumnLabel(cl, j, w[j]);
429
	for (i = 0; i < r_pr; i++) {
429
	for (i = 0; i < r_pr; i++) {
430
	    MatrixRowLabel(rl, i, rlabw, lbloff);
430
	    MatrixRowLabel(rl, i, rlabw, lbloff);
431
	    for (j = jmin; j < jmax; j++)
431
	    for (j = jmin; j < jmax; j++)
432
		Rprintf("%*s%s", w[j]-2, "", EncodeRaw(x[i + j * r]));
432
		Rprintf("%*s%s", w[j]-2, "", EncodeRaw(x[i + j * r], ""));
433
	}
433
	}
434
	Rprintf("\n");
434
	Rprintf("\n");
435
	jmin = jmax;
435
	jmin = jmax;
436
    }
436
    }
437
}
437
}