Введение

Массивы также можно рассматривать как поле для прыгающего мяча. Это, конечно, звучит очень расплывчато, поэтому вот пример ввода:

[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, -, -, -, 6, -, -, -]
[9, -, 7, -, 5, -, 3, -, 1]
[-, -, -, 4, -, -, -, 8, -]

Это приводит к [9, 2, 7, 4, 5, 6, 3, 8, 1]. Путь к третьему возвращенному массиву:

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

Это приводит к [1, 8, 3, 6, 5, 4, 7, 2, 9]. Итак, три подпрыгнутых массива :

[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]

Это код-гольф , поэтому выигрывает представление с наименьшим количеством байтов!

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_€/‘ż€Çị/€€

Спасибо за @ Sp3000 за помощь в выводе 5 байтов!

Попробуйте онлайн!

Рубин (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} ·

Я реализовал эти две функции числа до вызова:

• ò- так же, как o, но возвращается [X..Y]вместо[X..Y)
• ó- так же, как o, но возвращается [X..X+Y)вместо[X..Y)

Но из-за неуместного места 0они глючили и всегда возвращали пустые массивы. Теперь это было исправлено.

Проверьте это онлайн!

Python 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 - - - - -

В АПЗ 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определяя часто используемые значения.

Желе *, 15 байт

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

Попробуйте онлайн!

^{* Более новая версия}