Main Page | Directories | File List | Globals

dense.c File Reference

#include "dense.h"
#include "Mutils.h"

Functions

static int left_cyclic (double x[], int ldx, int j, int k, double cosines[], double sines[])
static SEXP getGivens (double x[], int ldx, int jmin, int rank)
SEXP checkGivens (SEXP X, SEXP jmin, SEXP rank)
SEXP lsq_dense_Chol (SEXP X, SEXP y)
SEXP lsq_dense_QR (SEXP X, SEXP y)
SEXP lapack_qr (SEXP Xin, SEXP tl)

Function Documentation

SEXP checkGivens SEXP  X,
SEXP  jmin,
SEXP  rank
 

static SEXP getGivens double  x[],
int  ldx,
int  jmin,
int  rank
[static]
 

SEXP lapack_qr SEXP  Xin,
SEXP  tl
 

static int left_cyclic double  x[],
int  ldx,
int  j,
int  k,
double  cosines[],
double  sines[]
[static]
 

Perform a left cyclic shift of columns j to k in the upper triangular matrix x, then restore it to upper triangular form with Givens rotations. The algorithm is based on the Fortran routine DCHEX from Linpack.

The lower triangle of x is not modified.

Parameters:
x Matrix stored in column-major order
ldx leading dimension of x
j column number (0-based) that will be shifted to position k
k last column number (0-based) to be shifted
cosines cosines of the Givens rotations
sines sines of the Givens rotations
Returns:
0 for success

SEXP lsq_dense_Chol SEXP  X,
SEXP  y
 

SEXP lsq_dense_QR SEXP  X,
SEXP  y
 


Generated on Tue Mar 1 16:58:10 2005 for Matrix by  doxygen 1.4.1