Mercurial > hg > ishara
annotate general/numerical/array/sumdims.m @ 61:eff6bddf82e3 tip
Finally implemented perceptual brightness thing.
| author | samer |
|---|---|
| date | Sun, 11 Oct 2015 10:20:42 +0100 |
| parents | db7f4afd27c5 |
| children |
| rev | line source |
|---|---|
| samer@4 | 1 function A=sumdims(A,dims) |
| samer@4 | 2 % sumdims - Sum over multiple dimensions |
| samer@4 | 3 % |
| samer@4 | 4 % sumdims :: |
| samer@4 | 5 % [Size:[[1,E]]->A] ~'E dimensional array', |
| samer@4 | 6 % Dims:[[K]->1..E] ~'dims to sum over' |
| samer@4 | 7 % -> [Size1->A] :- Size1=arrset(Size,Dims,1). |
| samer@4 | 8 % |
| samer@4 | 9 % Result is same size as input except for summed dimensions |
| samer@4 | 10 % which are collapsed to a size of 1. |
| samer@4 | 11 |
| samer@4 | 12 for i=dims, A=sum(A,i); end |