이 양 개의 정수를 타고 N와 M와의 연결된 누적 합계를 생성 [N]하여, M반복. 마지막 반복 결과를 출력합니다.

연결된 누적 합계의 정의 :

1. 숫자로 시작 N하고 순서를 정의하십시오X = [N]
2. X누적 합계에 추가X
3. 2 단계를 반복하십시오 M.

벡터의 누적 합 X = [x1, x2, x3, x4]은 다음과 같습니다 [x1, x1+x2, x1+x2+x3, x1+x2+x3+x4].

와 예 N = 1및 M = 4:

P = 누적 합 함수

M = 0: [1]
M = 1: [1, 1]                    -  X = [1, P(1)] = [[1], [1]]      
M = 2: [1, 1, 1, 2]              -  X = [X, P(X)] = [[1, 1], [1, 2]]
M = 3: [1, 1, 1, 2, 1, 2, 3, 5]  -  X = [X, P(X)] = [[1, 1, 1, 2], [1, 2, 3, 5]]
M = 4: [1, 1, 1, 2, 1, 2, 3, 5, 1, 2, 3, 5, 6, 8, 11, 16]

첫 번째 X = [1]는 반복으로 계산되지 않습니다. 당신은 M = 5위의 예 를 위해 선택할 수 있습니다 (따라서 계산X = [1] 한 번의 반복으로 계산).

이다 OEIS의 A107946

테스트 사례 :

N = 5, M = 1
5, 5

N = 2, M = 3
2, 2, 2, 4, 2, 4, 6, 10

N = 4, M = 6
4, 4, 4, 8, 4, 8, 12, 20, 4, 8, 12, 20, 24, 32, 44, 64, 4, 8, 12, 20, 24, 32, 44, 64, 68, 76, 88, 108, 132, 164, 208, 272, 4, 8, 12, 20, 24, 32, 44, 64, 68, 76, 88, 108, 132, 164, 208, 272, 276, 284, 296, 316, 340, 372, 416, 480, 548, 624, 712, 820, 952, 1116, 1324, 1596

이것은 code-golf 이므로 가장 짧은 코드가 승리합니다. 선택적 입력 및 출력 형식.

하스켈 , 35 바이트

n!m=iterate((++)<*>scanl1(+))[n]!!m

온라인으로 사용해보십시오!

-18 바이트의 H.PWiz 덕분에

05AB1E , 7 바이트

¸IFDηO«

온라인으로 사용해보십시오!

설명

¸         # wrap input_1 in a list
 IF       # input_2 times do:
   D      # duplicate the list
    η     # get prefixes of the list
     O    # sum the prefixes
      «   # concatenate to the current list

껍질 , 9 8 7 바이트

1 바이트 절약을위한 H.PWiz에 감사합니다.

!¡S+G+;

온라인으로 사용해보십시오!

1 기반을 사용합니다 M.

설명

      ;     Wrap N in a list to get [N].
 ¡          Iterate the following function on this list and collect
            the results in an infinite list.
  S+        Concatenate the current value with...
    G+      ...the cumulative sum. We're not using the cumsum built-in ∫ 
            because it prepends a zero.
!           Use M as an index into the infinite list.

MATL , 6 바이트

:"tYsh

입력은 M 다음 N.

온라인으로 사용해보십시오! 또는 모든 테스트 사례를 확인하십시오 .

설명

:"      % Implicitly input M. Do the following M times
  t     %   Implicitly input N the first time. Duplicate
  Ys    %   Cumulative sum
  h     %   Concatenate horizontally
        % Implicitly end loop. Implicitly display stack

Mathematica, 34 바이트

Nest[#~Join~Accumulate@#&,{#},#2]&

온라인으로 사용해보십시오!

파이썬 2 , 83 78 75 71 65 63 60 바이트

def f(n,m):r=n,;exec"s=0\nfor c in r:s+=c;r+=s,\n"*m;print r

온라인으로 사용해보십시오!

저장 6 8로드 덕분에 바이트를
저장 에릭에 3 개 바이트 덕분에

Dyalog APL , 12 바이트

{(⊢,+\)⍣⍺⊢⍵}

오른쪽은 N, 왼쪽은 M입니다. 여기에 APL을보십시오!

설명:

{(⊢,+\)⍣⍺⊢⍵}
{          } an anonymous function
 (⊢,+\)      a train for a single iteration:
  ⊢           the right argument
   ,          concatenated with
    +\        the cumulative sum 
       ⍣     repeated
        ⍺     left argument times
         ⊢⍵  on the right argument

자바 (오픈 JDK 8) , 194 (181) 175 163 134 110 바이트

(n,m)->{int a[]=new int[1<<m],c=1,i;for(a[0]=n;m-->0;)for(n=0;2*n<c;c++)for(i=++n;i-->0;a[c]+=a[i]);return a;}

온라인으로 사용해보십시오!

Dyalog APL , 19 바이트

{0=⍺:⍵⋄(⍺-1)∇⍵,+\⍵}

온라인으로 사용해보십시오!

N오른쪽과 M왼쪽 에있는 Dyadic 기능 .

{
    0=⍺: ⍵         ⍝ if a = 0 return
    (⍺-1) ∇ ⍵,+\⍵  ⍝ recurse with the array
                   ⍝ joined with its cumsum (+\⍵)
}

R , 46 바이트

function(N,M){for(i in 1:M)N=c(N,cumsum(N))
N}

온라인으로 사용해보십시오!

Pyth , 12 바이트

L+bsM._byF]E

여기에서 시도하십시오.

자바 스크립트 (ES6), 55 54 바이트

카레 구문으로 입력을 (m)(n)받습니다.

m=>g=a=>m--?g([...a=+a?[a]:a,...a.map(x=>s+=x,s=0)]):a

테스트 사례

let f =

m=>g=a=>m--?g([...a=+a?[a]:a,...a.map(x=>s+=x,s=0)]):a

console.log(f(1)(5).join(', '))
console.log(f(3)(2).join(', '))
console.log(f(6)(4).join(', '))

젤리 , 5 바이트

;+\$¡

온라인으로 사용해보십시오!

Dennis가 제안한 버전 ( 단일 배열 n대신 반환 [n]).

클로저, 67 바이트

#(loop[c[%]i %2](if(= i 0)c(recur(into c(reductions + c))(dec i))))