Changeset 8d33ed4f in tol
- Timestamp:
- May 11, 2010, 4:22:49 PM (16 years ago)
- Branches:
- 1941-docker-image-to-test, devel, master
- Children:
- 0c0e3bc
- Parents:
- 59d154b
- File:
-
- 1 edited
-
tol_pkg/BysVecLinReg/tools.tol (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
tol_pkg/BysVecLinReg/tools.tol
r59d154b r8d33ed4f 33 33 34 34 ////////////////////////////////////////////////////////////////////////////// 35 //Draws an standard multinormal x with equality constraining linear equations 35 //Draws an standard multinormal x with full rank constraining linear 36 //equalities 36 37 // 37 // x ~ N(0,I) 38 // C*x = c 39 // 38 // e ~ N(0,I) 39 // C*e = c 40 // 41 // where 42 // e <: R^n 43 // C <: R^rxn, r<n, rank(C)=r 44 // c <: R^r 45 // 46 //ALGORITHM: 47 // 48 // 1. Get pivoting order p of columns of diagonal of C*C' 49 // 3. Select p.1 as gaussian components of x as (n-r) last pivoted columns 50 // 2. Select p.2 as dependent components of x as first r pivoted columns 51 // 4. Draw e.1 as standard independent normal 52 // 5. Rewrite constraining linear equalities conditioned to e.1 53 // 54 // C = (C.1 C.2) 55 // e' = (e.1' e.2') 56 // C.1 * e.1 + C.2 * e.2 = c 57 // c.2 = c - C.1 58 // C.2 * e.2 = c.2 59 // 60 // 6. Solve linear system to get e.2 61 // 7. Merge e.1 and e.2 following the selected pivoting order to get the 62 // wanted draw of e 63 // 40 64 VMatrix eqConstrainedStdGaussian(VMatrix C, VMatrix c) 41 65 //////////////////////////////////////////////////////////////////////////////
Note: See TracChangeset
for help on using the changeset viewer.
