前書き

配列は、跳ねるボールのフィールドとして見ることもできます。もちろんこれは非常にあいまいに聞こえるので、入力の例を次に示します。

[1, 2, 3, 4, 5, 6, 7, 8, 9]
[9, 8, 7, 6, 5, 4, 3, 2, 1]
[1, 2, 3, 4, 5, 6, 7, 8, 9]

課題は、バウンスされた配列を出力することです。これらは、フィールドの端で跳ね返る斜めのパターンから作られています。この経路は上向きです。最初のバウンスされた配列のパス（パスがegdeから直接バウンスされる）は、次のとおりです。

[1, -, -, -, 5, -, -, -, 9]
[-, 8, -, 6, -, 4, -, 2, -]
[-, -, 3, -, -, -, 7, -, -]

左から右へ、これはになり[1, 8, 3, 6, 5, 4, 7, 2, 9]ます。これが最初のバウンス配列です。2番目のバウンスされた配列のパス：

[-, 2, -, -, -, 6, -, -, -]
[9, -, 7, -, 5, -, 3, -, 1]
[-, -, -, 4, -, -, -, 8, -]

これはになり[9, 2, 7, 4, 5, 6, 3, 8, 1]ます。3番目のバウンス配列のパスは次のとおりです。

[-, -, 3, -, -, -, 7, -, -]
[-, 8, -, 6, -, 4, -, 2, -]
[1, -, -, -, 5, -, -, -, 9]

これはになり[1, 8, 3, 6, 5, 4, 7, 2, 9]ます。したがって、バウンスされた3つの配列は次のとおりです。

[1, 8, 3, 6, 5, 4, 7, 2, 9]
[9, 2, 7, 4, 5, 6, 3, 8, 1]
[1, 8, 3, 6, 5, 4, 7, 2, 9]

仕事

すべての配列が同じ長さで、負でない整数のみを含む少なくとも1つの配列がある場合、バウンスされたすべての配列を出力します。

テストケース

テストケース1：

Input:                       Output:
[1, 2, 3, 4, 5]              [1, 7, 3, 9, 5]
[6, 7, 8, 9, 0]              [6, 2, 8, 4, 0]


Input:                       Output:
[1, 2, 3, 4, 5]              [1, 2, 3, 4, 5]


Input:                       Output:
[0, 0, 0, 0, 0, 0, 0, 0]     [0, 9, 0, 9, 0, 9, 0, 100]
[9, 9, 9, 9, 9, 9, 9, 100]   [9, 0, 9, 0, 9, 0, 9, 0]
[0, 0, 0, 0, 0, 0, 0, 0]     [0, 9, 0, 9, 0, 9, 0, 100]


Input:                       Output:
[0, 1, 2, 3, 4, 5]           [0, 7, 14, 9, 4, 11]
[6, 7, 8, 9, 10, 11]         [6, 1, 8, 15, 10, 5]
[12, 13, 14, 15, 16, 17]     [12, 7, 2, 9, 16, 11]


Input:                       Output:
[0, 0, 0, 0, 0, 0]           [0, 2, 2, 6, 2, 6]
[1, 2, 3, 4, 5, 6]           [1, 0, 3, 2, 5, 2]
[2, 2, 2, 2, 2, 2]           [2, 2, 0, 4, 2, 4]
[9, 8, 7, 6, 5, 4]           [9, 2, 3, 0, 5, 2]

これはcode-golfであるため、バイト数が最小の提出が勝ちです！

Pyth、17バイト

>lQC.e.>bkC+_PtQQ

説明：

                      implicit: Q=input
>                     First
  l Q                   len(Q) elements of the
  C .e                  Transpose of enumerated map lambda b,k:
       .>                 Rotate the kth element rightwards by
          b
          k               k.
       C +              Transpose of: Q concatenated to
           _ P t Q        itself reversed without first and last elements.
           Q

ここで試してみてください。

JavaScript（ES6）、70

a=>a.map((r,k)=>r.map((e,j)=>(a[k-=d]||a[d=-d,k-=d+d]||r)[j],d=1,++k))

テスト

F = a=>a.map((r,k)=>r.map((e,j)=>(a[k-=d]||a[d=-d,k-=d+d]||r)[j],d=1,++k))

test = [{
  I: [
    [1, 2, 3, 4, 5],
    [6, 7, 8, 9, 0]
  ],
  O: [
    [1, 7, 3, 9, 5],
    [6, 2, 8, 4, 0]
  ]
}, {
  I: [
    [1, 2, 3, 4, 5]
  ],
  O: [
    [1, 2, 3, 4, 5]
  ]
}, {
  I: [
    [0, 0, 0, 0, 0, 0, 0, 0],
    [9, 9, 9, 9, 9, 9, 9, 100],
    [0, 0, 0, 0, 0, 0, 0, 0]
  ],
  O: [
    [0, 9, 0, 9, 0, 9, 0, 100],
    [9, 0, 9, 0, 9, 0, 9, 0],
    [0, 9, 0, 9, 0, 9, 0, 100]
  ]
}, {
  I: [
    [0, 1, 2, 3, 4, 5],
    [6, 7, 8, 9, 10, 11],
    [12, 13, 14, 15, 16, 17]
  ],
  O: [
    [0, 7, 14, 9, 4, 11],
    [6, 1, 8, 15, 10, 5],
    [12, 7, 2, 9, 16, 11]
  ]
}, {
  I: [
    [0, 0, 0, 0, 0, 0],
    [1, 2, 3, 4, 5, 6],
    [2, 2, 2, 2, 2, 2],
    [9, 8, 7, 6, 5, 4]
  ],
  O: [
    [0, 2, 2, 6, 2, 6],
    [1, 0, 3, 2, 5, 2],
    [2, 2, 0, 4, 2, 4],
    [9, 2, 3, 0, 5, 2]
  ]
}];

console.log = x => O.textContent += x + '\n';

test.forEach(t => {
  var r = F(t.I),
    ok = r.join `\n` == t.O.join `\n`
  console.log((ok ? 'OK' : 'KO') + '\nInput\n' + t.I.join `\n` + '\nOutput\n' + r.join `\n` + '\n')
})

<pre id=O></pre>

CJam、31 30バイト

q~__W%1>W<+_z,_@*<zee::m>z\,<p

CJamスタイルの配列のリストとしての入出力。

ここでテストしてください。

最も間違いなくゴルフ可能...

ゼリー、29 25 24バイト

ṖḊm-³;Z
,ZL€R_€/‘ż€Çị/€€

5バイトのゴルフを手伝ってくれた@ Sp3000に感謝します！

オンラインでお試しください！

Ruby（2.2.2p95）、124バイト

->*a{b=a.length;b<2?a:b.times.map{|i|d=i>0?-1:1;c=i;a[0].length.times.map{|j|r=a[c][j];c+=d;d*=-1if c==0||c==a.length-1;r}}}

これはおそらくはるかに優れている可能性があります。後でわかります！

Japt、55 49 41 39バイト

うわー、それは本当にトリッキーであり、非常に面白かったです。

C=2*Nl -2Nw £YoY+Ul)£NgLmX%CC-X%C)gY} ·

オンラインでテストしてください！

例と逆の順序で出力します。これは、100を超える配列の入力ではわずかに壊れます。うまくいけば、これはあまり大きな違いをもたらさないでしょう。

           // Implicit: N = array of input arrays, U = first input array, J = -1, L = 100
           // Let's use the first example. 3 input arrays, each of length 9.
C=2*Nl -2  // Set variable C to 2*N.length - 2. In the example, C is 4.
Nw      }  // Reverse N and map each index Y to:
YoY+Ul)    //  Create the range [Y...U.length+Y).
           //  The first time through (Y=0), we have   [0, 1, 2, 3, 4, 5, 6, 7, 8]
£       }  //  Map each item X and index Y to:
X%C        //   Take X mod C.                          [0, 1, 2, 3, 0, 1, 2, 3, 0]
C-X%C      //   Take C - (X mod C).                    [4, 3, 2, 1, 4, 3, 2, 1, 4]
Lm         //   Take the minimum of these and 100.     [0, 1, 2, 1, 0, 1, 2, 1, 0]
Ng         //   Get the array at the resulting index.
gY         //   Get the item at index Y in this array. [1, 8, 3, 6, 5, 4, 2, 7, 9]
·          // Join the result with newlines. I guess this isn't necessary, but it helps with readability.

非競合バージョン、36バイト

C=J+Nl)òC±C ®óUl)£NgLmX%CC-X%C)gY} ·

チャレンジの前にこれらの2つの数値関数を実装しました。

• ò-と同じですがo、戻ります[X..Y]代わりに[X..Y)
• ó-と同じですがo、[X..X+Y)代わりに戻ります[X..Y)

しかし、見当違いのため 0、バグがあり、常に空の配列を返しました。これは修正されました。

オンラインでテストしてください！

パイソン2、107の 106 108 105 104バイト

（余分な括弧を削除しました）（開始位置が間違っています（ب_ب））（すでにその長さのリストがありました）

def b(a):
 r,e=len(a)-1,enumerate
 print[[a[abs((i-o-r)%(r*2or 1)-r)][i]for i,_ in e(q)]for o,q in e(a)]

関数への引数として入力を持つことは合法ですよね？私が初めてゴルフの解答を提出するのは初めてです。

APL、33文字

{(⍳≢⍵){0⌷(⍺-⍳≢⍉⍵)⊖⍵⍪1↓¯1↓⊖⍵}¨⊂↑⍵}

⎕IO←0と仮定します。元のマトリックスが最初と最後の行を削った状態でマトリックスを反転させて最初の次元に沿って増加する場合、マトリックスの上方への単純なシフトによって跳ねる動きを得ることができるという考え方です。グラフィカルに：

1 - - - - - 1 - - - -
- 2 - - - 2 - 2 - - -
- - 3 - 3 - - - 3 - 3
- - - 4 - - - - - 4 -

から

1 - - - - - 1 - - - -
- 2 - - - - - 2 - - -
- - 3 - - - - - 3 - -
- - - 4 - - - - - 4 -
- - - - 3 - - - - - 3
- - - - - 2 - - - - -

APLではreverseとupward rotate同じ記号です。⊖。

Clojure、125バイト

うわー、これは非常に高速で文字を蓄積しました。

(fn[v](let[H(count v)r range R(r H)](for[i R](map #((v %2)%)(r(count(v 0)))(drop i(cycle(concat R(reverse(r 1(dec H))))))))))

let頻繁に使用される値を-define することでバイトを節約しようとしています。

ゼリー *、15バイト

JṚŒḄṖṙ’Ʋị⁸Jị"$€

オンラインでお試しください！

^{*新しいバージョン}