The R Project SVN R-packages

Rev

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

Rev 4565 Rev 4901
Line 23... Line 23...
23
}
23
}
24
 
24
 
25
/**
25
/**
26
 * Apply Householder transformations and the row permutation P to y
26
 * Apply Householder transformations and the row permutation P to y
27
 *
27
 *
28
 * @param a sparse matrix containing the vectors defining the
28
 * @param V sparse matrix containing the vectors defining the
29
 *        Householder transformations
29
 *        Householder transformations
30
 * @param beta scaling factors for the Householder transformations
30
 * @param beta scaling factors for the Householder transformations
31
 * @param y contents of a V->m by nrhs dense matrix
-
 
32
 * @param p 0-based permutation vector of length V->m
31
 * @param p 0-based permutation vector of length V->m
33
 * @param nrhs number of right hand sides (i.e. ncol(y))
-
 
34
 * @param trans logical value - if TRUE create Q'y[p] otherwise Qy[p]
32
 * @param trans logical value - if TRUE create Q'y[p] otherwise Qy[p]
-
 
33
 * @param y contents of a V->m by nrhs dense matrix
-
 
34
 * @param ydims dimensions of y
35
 */
35
 */
36
static
36
static
37
void sparseQR_Qmult(cs *V, double *beta, int *p, int trans,
37
void sparseQR_Qmult(cs *V, double *beta, int *p, int trans,
38
		    double *y, int *ydims)
38
		    double *y, int *ydims)
39
{
39
{