アレイを細分する方法は？

Question

配列をパーセンテージでセグメントに分割したい。たとえば、100個の要素を[1/3,1/4,5/12]のセグメントに分割します（ただし、[1/3,1/4,5/12]*100=[33.3,25,41.7]）。[33,25,42]（[34,24,42]や[33,26,41]のようなものも受け入れられます.1以内での放浪は重要ではありません）。

現在、私は再帰的に

function x = segment(n,pct) 
x = n * pct; 
y = fix(x); 
r = x - y; 
for ii = 1 : length(r)-1 
    [r(ii),r(ii+1)] = deal(fix(r(ii)),r(ii+1)+r(ii)-fix(r(ii)));  
end 
x = y + r; 

segment(100,[1/3,1/4,5/12])が[33,25,42]を与え、これを行うためにループを使用します。

再帰的ループなしで良い方法がありますか？

Answer 1

あなたはそれを修正する必要がある場合にのみ、ほとんどの場合のためのAdielさんのコメントを使用し、直後に任意の不正な結果をキャッチし、それを修正することができます。

function out = segmt(n , pct) 

% This works by itself in many cases 
out = round(n.*pct) ; 

% for the other cases: 
% if the total is not equal to the initial number of point, the 
% difference will be affected to the largest value (to minimize the 
% percentage imbalance). 
delta = sum(out) - n ; 
if delta ~= 0 
    [~,idx] = max(out) ; 
    out(idx) = out(idx) - delta ; 
end