File: irand.m

package info (click to toggle)
suitesparse 1%3A5.12.0%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 176,720 kB
  • sloc: ansic: 1,193,914; cpp: 31,704; makefile: 6,638; fortran: 1,927; java: 1,826; csh: 765; ruby: 725; sh: 529; python: 333; perl: 225; sed: 164; awk: 35
file content (38 lines) | stat: -rw-r--r-- 720 bytes parent folder | download | duplicates (3)
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-2022, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0

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) ;