summaryrefslogtreecommitdiffstats
path: root/SD-VBS/common/matlab/randn.m
diff options
context:
space:
mode:
Diffstat (limited to 'SD-VBS/common/matlab/randn.m')
-rw-r--r--SD-VBS/common/matlab/randn.m22
1 files changed, 22 insertions, 0 deletions
diff --git a/SD-VBS/common/matlab/randn.m b/SD-VBS/common/matlab/randn.m
new file mode 100644
index 0000000..e8eb473
--- /dev/null
+++ b/SD-VBS/common/matlab/randn.m
@@ -0,0 +1,22 @@
1%! _randn_f2_i1i1
2
3function retRand = randn(m,n)
4
5retRand = ones(m,n);
6
7for i=1:m
8 for j=1:n
9 w = 10;
10 while(w>=1.0)
11 x1 = 2.0 * rand(1,1) - 1.0;
12 x2 = 2.0 * rand(1,1) - 1.0;
13 w = x1*x1 + x2*x2;
14 end
15 w = sqrt((-2.0*log(w))/w);
16 retRand(i,j) = x1*w;
17 end
18end
19
20
21
22