Oblicz ograniczoną sumę wektorów

19

Skumulowaną sumę wektora oblicza się po prostu biorąc sumę wszystkich poprzednich elementów. Na przykład:

vec =     [1  1  1 -1 -1 -1 -1 -1  1  1  1  1 -1]
cum_vec = [1  2  3  2  1  0 -1 -2 -1  0  1  2  1]

Teraz nałóż górną i dolną granicę, co oznacza, że ​​przestaniesz zwiększać sumę skumulowaną, jeśli jest na górnej granicy, i przestaniesz zmniejszać sumę skumulowaną, jeśli będzie na dolnej granicy. Prosty przykład:

upper_lim = 2
lower_lim = -1
vec =     [1  1  1 -1 -1 -1 -1 -1  1  1  1  1 -1]
cum_vec = [1  2  2  1  0 -1 -1 -1  0  1  2  2  1]

Wektor wejściowy składa się z liczb całkowitych, niekoniecznie tylko 1i -1dodatnich i ujemnych. Załóżmy, że upper_lim >= lower_lim. Jeśli pierwszy element wektora znajduje się poza granicą, przeskocz bezpośrednio do granicy (patrz ostatni przykład).

Napisz funkcję, która pobiera wektor liczb całkowitych jako dane wejściowe i dwie liczby całkowite reprezentujące górną i dolną granicę. Wyprowadza ograniczony wektor skumulowany, jak zdefiniowano powyżej. Dane wejściowe mogą być argumentami funkcji lub ze STDIN.

Obowiązują standardowe zasady gry w golfa.

Przykłady:

upper_lim = 6
lower_lim = -2
vec =     [1  4  3 -10  3  2  2  5 -4]
cum_vec = [1  5  6  -2  1  3  5  6  2]

upper_lim = 100
lower_lim = -100
vec =     [1  1  1  1  1  1]
cum_vec = [1  2  3  4  5  6]

upper_lim = 5
lower_lim = 0
vec =     [10 -4 -3  2]
cum_vec = [5   1  0  2]

upper_lim = 0
lower_lim = 0
vec =     [3  5 -2  1]
cum_vec = [0  0  0  0]

upper_lim = 10
lower_lim = 5
vec =     [1  4  6]
cum_vec = [5  9 10]
           |
           Note, jumped to 5, because 5 is the lower bound.
Stewie Griffin
źródło

Odpowiedzi:

5

Pyth, 14 bajtów

t.u@S+Q+NY1vwZ

Wypróbuj online: pakiet demonstracyjny lub testowy

Wyjaśnienie

t.u@S+Q+NY1vwZ  implicit: Q = first input list [upper_lim, lower_lim]
 .u        vwZ  for each number Y in the next input list, update N = 0 with:
       +NY         N + Y
     +Q            append this to Q
    S              sort this list
   @      1        take the middle element
                .u returns a list with all intermediate values of N
t                  remove the first value, print the rest
Jakube
źródło
5

CJam, 16 15 bajtów

l~f{\T++$1=:T}`

Wypróbuj online

To traktuje listę jako pierwszy argument, a parę górnego / dolnego limitu jako drugą listę 2-elementową. Przykładowe dane wejściowe:

[1 4 3 -10 3 2 2 5 -4] [6 -2]

Najnowsza wersja pozwala zaoszczędzić 1 bajt, sortując 3 wartości i przyjmując środkową wartość zamiast operacji max i min. Zostało to również wykorzystane w rozwiązaniu Jakube, a także zasugerowane przez Martina.

Wyjaśnienie:

l~    Get and parse input. This leaves the value and bounds lists on the stack.
f{    Apply block with value (the bounds list).
  \     Swap new value to top.
  T     Get previous value from variable T (which is default initialized to 0).
  +     Add new value and previous value.
  +     Append new value to bounds list, producing a 3 value list.
  $     Sort it...
  1=    And take the middle value.
  :T    Store in variable T for next iteration.
}     End of apply loop.
`     Convert list to string.
Reto Koradi
źródło
4

JavaScript (ES6), 43 bajty

(l,u,v,p=0)=>v.map(c=>p=(p+=c)<l?l:p>u?u:p)

Definiuje anonimową funkcję, która pobiera dane wejściowe w formacie lower bound, upper bound, vector (as JS Array). Nie wiem, czy może być krótszy, ale spróbuję. Sugestie mile widziane!

ETHprodukcje
źródło
4

Haskell, 37 bajtów

u#l=tail.scanl(((min u.max l).).(+))0

Przykład użycia: 6 # (-2) $ [1,4,3,-10,3,2,2,5,-4]->[1,5,6,-2,1,3,5,6,2] .

Rozpocznij sumę, 0aby naprawić wartości początkowe poza granicami. Weź, tailaby usunąć go z końcowego wyniku.

nimi
źródło
3

R, 61 bajtów

function(x,l,u,s=0)sapply(x,function(i)s<<-min(u,max(l,s+i)))

sapplyjest funkcją do zastosowania funkcji do każdego elementu wektora (tutaj x), ale zwykle odbywa się to w kontekście, w którym wszystkie oceny są niezależne i nie powodują skutków ubocznych. Tutaj jednak używam <<-operatora do przypisania w środowisku nadrzędnym / wywołującym, sapplyaby skumulowana suma smogła być przechowywana poza ocenami iteracyjnymi. To bardzo zła praktyka ...

flodel
źródło
3

Mathematica, 46 bajtów

Rest@FoldList[{a,b}Min[a+b,#2]~Max~#3,0,#]&

Zabawna postać to U + F4A1 dla \[Function]. Jeśli można założyć, że pierwszy element należy do zakresu, mógłbym zapisać 7 bajtów.

LegionMammal978
źródło
3

Julia, 44 42 38 bajtów

f(x,l,u,s=0)=[s=clamp(s+i,l,u)for i=x]

Tworzy to funkcję, fktóra akceptuje tablicę i dwie liczby całkowite i zwraca tablicę.

Nie golfowany:

function f(v::Array, u::Int, l::Int, s::Int = 0)
    # The parameter s is the cumulative sum, which begins
    # at 0

    # For each element i of v, define s to be s+i if
    # l ≤ s+i ≤ u, l if s+i < l, or u if s+i > u
    x = [s = clamp(s + i, l, u) for i = v]

    return x
end

Zaoszczędzono 2 bajty, wykorzystując pomysł ETHproductions włączenia sumy łącznej jako parametru funkcji oraz 1 bajt dzięki Glen O.

Alex A.
źródło
3

Python 2, 67 bajtów

lambda u,l,v:reduce(lambda x,y:x+[max(min(x[-1]+y,u),l)],v,[0])[1:]
TFeld
źródło
2

Minkolang 0,9 , 30 bajtów

0I3-[2g+d0c`,3&x0cd1c`3&x1cdN]

To, jako funkcja, zakłada, że ​​stos został wstępnie zainicjowany high, low, vector. Pełny program znajduje się poniżej ( 37 bajtów ) i przyjmuje dane wejściowe jako high, low, vector.

(n$I$)0I4-[2g+d0c`,3&x0cd1c`3&x1cdN].

Wypróbuj tutaj.

Wyjaśnienie

(n$I$)                                   Read in integers from input until empty
      0                                  Initialize cumulative sum
       I4-[                        ]     Loop over vector
           2g+                           Get the next partial sum
              d0c`,3&x0c                 If too high, replace with high
                        d1c`3&x1cd       If too low, replace with low
                                  N      Output as integer
                                    .    Stop
El'endia Starman
źródło
1

C 98 bajtów

Jest długi, ale działa

#define P printf(
void c(*v,n,u,l,s,c){P"[");while(c++<n)s+=*v++,s=s<u?s>l?s:l:u,P"%d ",s);P"]");}

Przykład użycia

#define P printf(
void c(*v,n,u,l,s,c) {
    P"[");
    while(c++<n)
        s+=*v++,s=s<u?s>l?s:l:u,P"%d ",s);
    P"]");
}

int main() {
    int vec[9] = {1, 4, 3, -10, 3, 2, 2, 5, -4};
    int upper = 6, lower = -2, count = 9;
    c(vec, count, upper, lower, 0, 0);
}

Wynik byłby

[1 5 6 -2 1 3 5 6 2 ]
Chris Loonam
źródło
1

APL, 29 27 18 bajtów

Jak zauważył na czacie Dennis \, funkcja (rozwiń) działa od lewej do prawej, ale stosuje funkcję rozwijaną od prawej do lewej. Więc nie możemy tak po prostu zrobić 1↓(⎕⌈⎕⌊+)\0,⎕. Rozwiązujemy ten problem, biorąc ,\tablicę, a następnie przetwarzając każdą podtablicę osobno, używając /(fold).

1↓(⎕⌈⎕⌊+)/¨⌽¨,\0,⎕

Wprowadź w kolejności array, upper bound, lower bound.

lirtosiast
źródło