#include <linalg.h>

Static Public Member Functions
static void	SaveCsvTFltV (const TFltV &Vec, TSOut &SOut)

static void	SaveMatlabTFltIntKdV (const TIntFltKdV &SpV, const int &ColN, TSOut &SOut)

static void	SaveMatlabTFltV (const TFltV &m, const TStr &FName)

static void	SaveMatlabTIntV (const TIntV &m, const TStr &FName)

static void	SaveMatlabTFltVVCol (const TFltVV &m, int ColId, const TStr &FName)

static void	SaveMatlabTFltVV (const TFltVV &m, const TStr &FName)

static void	SaveMatlabTFltVVMjrSubMtrx (const TFltVV &m, int rowN, int colN, const TStr &FName)

static void	LoadMatlabTFltVV (const TStr &FNm, TVec< TFltV > &ColV)

static void	LoadMatlabTFltVV (const TStr &FNm, TFltVV &MatrixVV)

static void	PrintTFltV (const TFltV &Vec, const TStr &VecNm)

static void	PrintTFltVV (const TFltVV &A, const TStr &MatrixNm)

static void	PrintTIntV (const TIntV &Vec, const TStr &VecNm)

static void	FillRnd (TFltV &Vec)

static void	FillRnd (TFltV &Vec, TRnd &Rnd)

static void	Fill (TFltVV &M, const double &Val)

static void	FillZero (TFltV &Vec)

static void	FillZero (TFltVV &M)

static void	FillIdentity (TFltVV &M)

static void	FillIdentity (TFltVV &M, const double &Elt)

static int	SumVec (const TIntV &Vec)

static double	SumVec (const TFltV &Vec)

static void	ToSpVec (const TFltV &Vec, TIntFltKdV &SpVec, const double &CutWordWgtSumPrc=0.0)

static void	ToVec (const TIntFltKdV &SpVec, TFltV &Vec, const int &VecLen)

Detailed Description

Definition at line 494 of file linalg.h.

Member Function Documentation

static void TLAMisc::Fill	(	TFltVV &	M,
		const double &	Val
	)

static

Referenced by FillZero().

Here is the caller graph for this function:

void TLAMisc::FillIdentity ( TFltVV & M )

static

Definition at line 1751 of file linalg.cpp.

References TVVec< TVal, TSizeTy >::GetCols(), TVVec< TVal, TSizeTy >::GetRows(), and IAssert.

Referenced by TSparseSVD::SimpleLanczos().

                                     {
     IAssert(M.GetRows() == M.GetCols());
     int Len = M.GetRows();
     for (int i = 0; i < Len; i++) {
         for (int j = 0; j < Len; j++) M(i,j) = 0.0;
         M(i,i) = 1.0;
     }
 }

Here is the call graph for this function:

Here is the caller graph for this function:

void TLAMisc::FillIdentity	(	TFltVV &	M,
		const double &	Elt
	)

static

Definition at line 1760 of file linalg.cpp.

References TVVec< TVal, TSizeTy >::GetCols(), TVVec< TVal, TSizeTy >::GetRows(), and IAssert.

                                                        {
     IAssert(M.GetRows() == M.GetCols());
     int Len = M.GetRows();
     for (int i = 0; i < Len; i++) {
         for (int j = 0; j < Len; j++) M(i,j) = 0.0;
         M(i,i) = Elt;
     }
 }

Here is the call graph for this function:

static void TLAMisc::FillRnd ( TFltV & Vec )

inlinestatic

Definition at line 521 of file linalg.h.

References FillRnd().

Referenced by FillRnd().

521 { TRnd Rnd(0); FillRnd(Vec, Rnd); }

TRnd

Definition: dt.h:11

TLAMisc::FillRnd

static void FillRnd(TFltV &Vec)

Definition: linalg.h:521

Here is the call graph for this function:

Here is the caller graph for this function:

void TLAMisc::FillRnd	(	TFltV &	Vec,
		TRnd &	Rnd
	)

static

Definition at line 1745 of file linalg.cpp.

References TRnd::GetNrmDev(), and TVec< TVal, TSizeTy >::Len().

                                            {
     int Len = Vec.Len();
     for (int i = 0; i < Len; i++)
         Vec[i] = Rnd.GetNrmDev();
 }

Here is the call graph for this function:

static void TLAMisc::FillZero ( TFltV & Vec )

inlinestatic

Definition at line 526 of file linalg.h.

References TVec< TVal, TSizeTy >::PutAll().

526 { Vec.PutAll(0.0); }

TVec::PutAll

void PutAll(const TVal &Val)

Sets all elements of the vector to value Val.

Definition: ds.h:1229

Here is the call graph for this function:

static void TLAMisc::FillZero ( TFltVV & M )

inlinestatic

Definition at line 527 of file linalg.h.

References Fill().

527 { Fill(M, 0.0); }

TLAMisc::Fill

static void Fill(TFltVV &M, const double &Val)

Here is the call graph for this function:

void TLAMisc::LoadMatlabTFltVV	(	const TStr &	FNm,
		TVec< TFltV > &	ColV
	)

static

Definition at line 1670 of file linalg.cpp.

References TVec< TVal, TSizeTy >::Add(), TVec< TVal, TSizeTy >::Clr(), Fail, TILx::Flt, TILx::GetSym(), TVec< TFlt >::GetV(), IAssert, iloExcept, iloRetEoln, iloSigNum, TVec< TVal, TSizeTy >::Len(), TFIn::New(), syEof, syEoln, syFlt, and TILx::Sym.

Referenced by LoadMatlabTFltVV(), and TFullColMatrix::TFullColMatrix().

                                                                  {
     PSIn SIn = TFIn::New(FNm);
     TILx Lx(SIn, TFSet()|iloRetEoln|iloSigNum|iloExcept);
     int Row = 0, Col = 0; ColV.Clr();
     Lx.GetSym(syFlt, syEof, syEoln);
     //printf("%d x %d\r", Row, ColV.Len());
     while (Lx.Sym != syEof) {
         if (Lx.Sym == syFlt) {
             if (ColV.Len() > Col) {
                 IAssert(ColV[Col].Len() == Row);
                 ColV[Col].Add(Lx.Flt);
             } else {
                 IAssert(Row == 0);
                 ColV.Add(TFltV::GetV(Lx.Flt));
             }
             Col++;
         } else if (Lx.Sym == syEoln) {
             IAssert(Col == ColV.Len());
             Col = 0; Row++;
             if (Row%100 == 0) {
                 //printf("%d x %d\r", Row, ColV.Len());
             }
         } else {
             Fail;
         }
         Lx.GetSym(syFlt, syEof, syEoln);
     }
     //printf("\n");
     IAssert(Col == ColV.Len() || Col == 0);
 }

Here is the call graph for this function:

Here is the caller graph for this function:

void TLAMisc::LoadMatlabTFltVV	(	const TStr &	FNm,
		TFltVV &	MatrixVV
	)

static

Definition at line 1701 of file linalg.cpp.

References TVVec< TVal, TSizeTy >::Clr(), TVec< TVal, TSizeTy >::Empty(), TVVec< TVal, TSizeTy >::Gen(), TVec< TVal, TSizeTy >::Len(), and LoadMatlabTFltVV().

                                                                 {
     TVec<TFltV> ColV; LoadMatlabTFltVV(FNm, ColV);
     if (ColV.Empty()) { MatrixVV.Clr(); return; }
     const int Rows = ColV[0].Len(), Cols = ColV.Len();
     MatrixVV.Gen(Rows, Cols);
     for (int RowN = 0; RowN < Rows; RowN++) {
         for (int ColN = 0; ColN < Cols; ColN++) {
             MatrixVV(RowN, ColN) = ColV[ColN][RowN];
         }
     }
 }

Here is the call graph for this function:

void TLAMisc::PrintTFltV	(	const TFltV &	Vec,
		const TStr &	VecNm
	)

static

Definition at line 1714 of file linalg.cpp.

References TStr::CStr(), and TVec< TVal, TSizeTy >::Len().

                                                             {
     printf("%s = [", VecNm.CStr());
     for (int i = 0; i < Vec.Len(); i++) {
         printf("%.5f", Vec[i]());
                 if (i < Vec.Len() - 1) { printf(", "); }
     }
     printf("]\n");
 }

Here is the call graph for this function:

void TLAMisc::PrintTFltVV	(	const TFltVV &	A,
		const TStr &	MatrixNm
	)

static

Definition at line 1724 of file linalg.cpp.

References TVVec< TVal, TSizeTy >::At(), TStr::CStr(), TVVec< TVal, TSizeTy >::GetCols(), TVVec< TVal, TSizeTy >::GetRows(), and TFlt::Val.

                                                                {
     printf("%s = [\n", MatrixNm.CStr());
         for (int j = 0; j < A.GetRows(); j++) {
                 for (int i = 0; i < A.GetCols(); i++) {
                         printf("%f\t", A.At(i, j).Val);
                 }
                 printf("\n");
         }
     printf("]\n");
 }

Here is the call graph for this function:

void TLAMisc::PrintTIntV	(	const TIntV &	Vec,
		const TStr &	VecNm
	)

static

Definition at line 1735 of file linalg.cpp.

References TStr::CStr(), and TVec< TVal, TSizeTy >::Len().

                                                             {
     printf("%s = [", VecNm.CStr());
     for (int i = 0; i < Vec.Len(); i++) {
         printf("%d", Vec[i]());
         if (i < Vec.Len() - 1) printf(", ");
     }
     printf("]\n");
 }

Here is the call graph for this function:

void TLAMisc::SaveCsvTFltV	(	const TFltV &	Vec,
		TSOut &	SOut
	)

static

Definition at line 1598 of file linalg.cpp.

References TVec< TVal, TSizeTy >::Len(), TSOut::PutCh(), TSOut::PutFlt(), and TSOut::PutLn().

                                                         {
     for (int ValN = 0; ValN < Vec.Len(); ValN++) {
         SOut.PutFlt(Vec[ValN]); SOut.PutCh(',');
     }
     SOut.PutLn();
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTFltIntKdV	(	const TIntFltKdV &	SpV,
		const int &	ColN,
		TSOut &	SOut
	)

static

Definition at line 1605 of file linalg.cpp.

References TStr::Fmt(), TVec< TVal, TSizeTy >::Len(), and TSOut::PutStrLn().

                                                                                       {
     const int Len = SpV.Len();
     for (int ValN = 0; ValN < Len; ValN++) {
         SOut.PutStrLn(TStr::Fmt("%d %d %g", SpV[ValN].Key+1, ColN+1, SpV[ValN].Dat()));
     }
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTFltV	(	const TFltV &	m,
		const TStr &	FName
	)

static

Definition at line 1612 of file linalg.cpp.

References TSOut::Flush(), TFlt::GetStr(), TVec< TVal, TSizeTy >::Len(), TFOut::New(), TSOut::PutCh(), and TSOut::PutStr().

                                                                {
     PSOut out = TFOut::New(FName);
     const int RowN = m.Len();
     for (int RowId = 0; RowId < RowN; RowId++) {
         out->PutStr(TFlt::GetStr(m[RowId], 20, 18));
         out->PutCh('\n');
     }
     out->Flush();
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTFltVV	(	const TFltVV &	m,
		const TStr &	FName
	)

static

Definition at line 1643 of file linalg.cpp.

References TSOut::Flush(), TVVec< TVal, TSizeTy >::GetCols(), TVVec< TVal, TSizeTy >::GetRows(), TFlt::GetStr(), TFOut::New(), TSOut::PutCh(), and TSOut::PutStr().

                                                                  {
     PSOut out = TFOut::New(FName);
     const int RowN = m.GetRows();
     const int ColN = m.GetCols();
     for (int RowId = 0; RowId < RowN; RowId++) {
         for (int ColId = 0; ColId < ColN; ColId++) {
             out->PutStr(TFlt::GetStr(m(RowId,ColId), 20, 18));
             out->PutCh(' ');
         }
         out->PutCh('\n');
     }
     out->Flush();
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTFltVVCol	(	const TFltVV &	m,
		int	ColId,
		const TStr &	FName
	)

static

Definition at line 1632 of file linalg.cpp.

References TSOut::Flush(), TVVec< TVal, TSizeTy >::GetRows(), TFlt::GetStr(), TFOut::New(), TSOut::PutCh(), and TSOut::PutStr().

                                                                                {
     PSOut out = TFOut::New(FName);
     const int RowN = m.GetRows();
     for (int RowId = 0; RowId < RowN; RowId++) {
         out->PutStr(TFlt::GetStr(m(RowId,ColId), 20, 18));
         out->PutCh('\n');
     }
     out->Flush();
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTFltVVMjrSubMtrx	(	const TFltVV &	m,
		int	rowN,
		int	colN,
		const TStr &	FName
	)

static

Definition at line 1657 of file linalg.cpp.

References TSOut::Flush(), TFlt::GetStr(), TFOut::New(), TSOut::PutCh(), and TSOut::PutStr().

                                                {
 
     PSOut out = TFOut::New(FName);
     for (int RowId = 0; RowId < RowN; RowId++) {
         for (int ColId = 0; ColId < ColN; ColId++) {
             out->PutStr(TFlt::GetStr(m(RowId,ColId), 20, 18)); out->PutCh(' ');
         }
         out->PutCh('\n');
     }
     out->Flush();
 }

Here is the call graph for this function:

void TLAMisc::SaveMatlabTIntV	(	const TIntV &	m,
		const TStr &	FName
	)

static

Definition at line 1622 of file linalg.cpp.

References TSOut::Flush(), TVec< TVal, TSizeTy >::Len(), TFOut::New(), TSOut::PutCh(), and TSOut::PutInt().

                                                                {
     PSOut out = TFOut::New(FName);
     const int RowN = m.Len();
     for (int RowId = 0; RowId < RowN; RowId++) {
         out->PutInt(m[RowId]);
         out->PutCh('\n');
     }
     out->Flush();
 }

Here is the call graph for this function:

int TLAMisc::SumVec ( const TIntV & Vec )

static

Definition at line 1769 of file linalg.cpp.

References TVec< TVal, TSizeTy >::Len().

                                     {
     const int Len = Vec.Len();
     int res = 0;
     for (int i = 0; i < Len; i++)
         res += Vec[i];
     return res;
 }

Here is the call graph for this function:

double TLAMisc::SumVec ( const TFltV & Vec )

static

Definition at line 1777 of file linalg.cpp.

References TVec< TVal, TSizeTy >::Len().

                                        {
     const int Len = Vec.Len();
     double res = 0.0;
     for (int i = 0; i < Len; i++)
         res += Vec[i];
     return res;
 }

Here is the call graph for this function:

void TLAMisc::ToSpVec	(	const TFltV &	Vec,
		TIntFltKdV &	SpVec,
		const double &	CutWordWgtSumPrc = `0.0`
	)

static

Definition at line 1785 of file linalg.cpp.

References TFlt::Abs(), TVec< TVal, TSizeTy >::Add(), TVec< TVal, TSizeTy >::Clr(), IAssert, TVec< TVal, TSizeTy >::Len(), and TVec< TVal, TSizeTy >::Pack().

                                  {
 
     // determine minimal element value
     IAssert(0.0 <= CutSumPrc && CutSumPrc <= 1.0);
     const int Elts = Vec.Len();
     double EltSum = 0.0;
     for (int EltN = 0; EltN < Elts; EltN++) {
         EltSum += TFlt::Abs(Vec[EltN]); }
     const double MnEltVal = CutSumPrc * EltSum;
     // create sparse vector
     SpVec.Clr();
     for (int EltN = 0; EltN < Elts; EltN++) {
         if (TFlt::Abs(Vec[EltN]) > MnEltVal) {
             SpVec.Add(TIntFltKd(EltN, Vec[EltN]));
         }
     }
     SpVec.Pack();
 }

Here is the call graph for this function:

void TLAMisc::ToVec	(	const TIntFltKdV &	SpVec,
		TFltV &	Vec,
		const int &	VecLen
	)

static

Definition at line 1805 of file linalg.cpp.

References TVec< TVal, TSizeTy >::Gen(), TVec< TVal, TSizeTy >::Len(), and TVec< TVal, TSizeTy >::PutAll().

                                                                           {
     Vec.Gen(VecLen); Vec.PutAll(0.0);
     int Elts = SpVec.Len();
     for (int EltN = 0; EltN < Elts; EltN++) {
         if (SpVec[EltN].Key < VecLen) {
             Vec[SpVec[EltN].Key] = SpVec[EltN].Dat;
         }
     }
 }

Here is the call graph for this function:

The documentation for this class was generated from the following files:

glib-core/linalg.h
glib-core/linalg.cpp

Static Public Member Functions

Detailed Description

Member Function Documentation