PEIP (version 2.2-5)

setDesignG: Set a Design Matrix.

Description

Creata design matrix for simulating a tomographic inversion on a simple grid.

Usage

setDesignG()

Author

Jonathan M. Lees<[e-mail]>

Details

Set up a simple design matrix for tomographic in version. This is used in examples and illustrations of tomographics and matrix inversion methods.

Examples

G = setDesignG()

### show the 56-th row
g = matrix( G[56,] , ncol=16, nrow=16)
imagesc(g)

if (FALSE) {
### show total coverage
zim = matrix(0 , ncol=16, nrow=16)
for(i in 1:dim(G)[1])
{
g = matrix( G[i,] , ncol=16, nrow=16)
zim =zim + g
}
image(zim)


}