diff options
Diffstat (limited to 'SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/factorial.m')
-rwxr-xr-x | SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/factorial.m | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/factorial.m b/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/factorial.m new file mode 100755 index 0000000..9255f43 --- /dev/null +++ b/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/factorial.m | |||
@@ -0,0 +1,16 @@ | |||
1 | %% RES = factorial(NUM) | ||
2 | % | ||
3 | % Factorial function that works on matrices (matlab's does not). | ||
4 | |||
5 | % EPS, 11/02 | ||
6 | |||
7 | function res = factorial(num) | ||
8 | |||
9 | res = ones(size(num)); | ||
10 | |||
11 | ind = find(num > 0); | ||
12 | if ( ~isempty(ind) ) | ||
13 | subNum = num(ind); | ||
14 | res(ind) = subNum .* factorial(subNum-1); | ||
15 | end | ||
16 | |||