The R Project SVN R

Rev

Rev 87891 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 87891 Rev 88856
Line 77... Line 77...
77 
		EncodeString(tmp, l, 0, Rprt_adj_right)); */
 77 
		EncodeString(tmp, l, 0, Rprt_adj_right)); */
78 
	Rprintf("%*s%s", R_print.gap+w-l, "",
 78 
	Rprintf("%*s%s", R_print.gap+w-l, "",
79 
		EncodeString(tmp, l, 0, Rprt_adj_right));
 79 
		EncodeString(tmp, l, 0, Rprt_adj_right));
80 
    }
 80 
    }
81 
    else {
 81 
    else {
82 
	Rprintf("%*s[,%ld]%*s", R_print.gap, "", (long)j+1, w-IndexWidth(j+1)-3, "");
 82 
	Rprintf("%*s[,%ld]", R_print.gap+w-IndexWidth(j+1)-3, "", (long)j+1);
83 
    }
 83 
    }
84 
}
 84 
}
85 
 
 85 
 
86 
static void LeftMatrixColumnLabel(SEXP cl, int j, int w)
 86 
static void LeftMatrixColumnLabel(SEXP cl, int j, int w)
87 
{
 87 
{