File: irand.m

package info (click to toggle)
suitesparse 1%3A5.8.1%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 152,716 kB
  • sloc: ansic: 774,385; cpp: 24,213; makefile: 6,310; fortran: 1,927; java: 1,826; csh: 1,686; ruby: 725; sh: 535; perl: 225; python: 209; sed: 164; awk: 60
file content (38 lines) | stat: -rw-r--r-- 752 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
function I = irand (imin, imax, m, n)
%IRAND construct a random integer matrix 
%
% return a random m-by-n matrix of integers (uint64)
% in the range imin:imax, inclusive
%
% I = irand (imin, imax, m, n)
%
% if imin > imax, the ranges are swapped.

% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2020, All Rights Reserved.
% http://suitesparse.com   See GraphBLAS/Doc/License.txt for license.

if (nargin < 4)
    n = 1 ;
end

if (nargin < 3)
    m = 1 ;
end

if (imin > imax)
    t = imin ;
    imin = imax ;
    imax = t ;
end

if (imin == imax)
    I = uint64 (imin) * ones (m, n, 'uint64') ;
else
    x = rand (m,n) ;
    I = uint64 (floor ((imax-imin+1) * x) + imin) ;
end

assert (min (min (I)) >= imin) ;
assert (max (max (I)) <= imax) ;