fork download 
  1. function A = accumarrayStable2(varargin)
  2. subs = varargin{1};
  3. val = varargin{2};
  4. if numel(varargin)>2 && ~isempty(varargin{3})
  5.     sz = varargin{3};
  6. else
  7.     sz = max(subs,[],1);
  8. end
  9. sub2Lin = @(subs) (subs-1)*cumprod([1,sz(1:end-1)]).'+1;
  10. [subs, I] = sort(sub2Lin(subs));
  11. A = reshape(accumarray(subs, val(I), [prod(sz),1], varargin{4:end}), sz);
  12.  
Success #stdin #stdout #stderr 0.17s 65048KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
stderr 
parse error:

  function body open at end of input
https://ideone.com/83TSFx
language:
Octave (octave 4.4.1)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!