|
D.2.5.8 sparsetriag
Procedure from library random.lib (see section random_lib).
- Usage:
sparsetriag(n,m[,p,b]); n,m,p,b integers
- Return:
nxm lower triagonal integer matrix, diagonal entries equal to 1, about
p percent of lower diagonal entries are 0, the remaining are random
integers >=1 and <= b; [defaults: (p,b) = (75,1)]
Example:
LIB "random.lib";
sparsetriag(5,7);"";
→ 1,0,0,0,0,0,0,
→ 0,1,0,0,0,0,0,
→ 0,1,1,0,0,0,0,
→ 0,0,0,1,0,0,0,
→ 1,1,0,0,1,0,0
→
sparsetriag(7,5,90);"";
→ 1,0,0,0,0,
→ 0,1,0,0,0,
→ 0,1,1,0,0,
→ 0,0,0,1,0,
→ 0,0,0,0,1,
→ 0,0,0,1,0,
→ 0,1,0,0,0
→
sparsetriag(5,5,0);"";
→ 1,0,0,0,0,
→ 1,1,0,0,0,
→ 1,1,1,0,0,
→ 1,1,1,1,0,
→ 1,1,1,1,1
→
sparsetriag(5,5,50,100);
→ 1,0,0,0,0,
→ 73,1,0,0,0,
→ 0,79,1,0,0,
→ 14,0,0,1,0,
→ 0,48,23,0,1
|