介绍

有时，我的盒子太小，无法容纳任何物品。我需要你做一个盒子扩展器！因此，是什么让盒子在这个挑战中成为盒子。

 OOOO
O    O
O    O
O    O
 OOOO

盒子的角总是空格。盒子本身可以用相同的字符制成。该字符可以是任何可打印的ASCII字符（空格除外）。因此，这些字符是：

!"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~

上述箱的侧面的长度是4个，3。您可以假设边长始终为正。这意味着这是您需要处理的最小盒子：

 #
# #
 #

为了扩展一个框，您需要增加每边的长度。让我们通过上面的示例逐步进行此操作。我们首先选择盒子的上侧，即：

 OOOO

我们将其扩展一，因此得到：

 OOOOO

这是盒子的上部和下部。之后，我们对左右两侧进行相同的操作：

O
O
O

成为：

O
O
O
O

现在我们重新组装盒子，结果是：

 OOOOO
O     O
O     O
O     O
O     O
 OOOOO

任务

给定一个框，将其展开1。该框可以多行或数组形式给出。

测试用例

 OOOO          OOOOO
O    O    >   O     O
 OOOO         O     O
               OOOOO

 XXXXXX        XXXXXXX
X      X  >   X       X
X      X      X       X
 XXXXXX       X       X
               XXXXXXX

 ~             ~~
~ ~       >   ~  ~
 ~            ~  ~
               ~~

这是代码高尔夫球，因此，字节数最少的提交将获胜！

V，6 5字节

yêpjÄ

在线尝试！

实际上，这比应该的要长一个字节。应该是：

äêjÄ

但这有一个未知的错误。:(

说明：

yê     "yank this colum
  p    "paste what we just yanked
   j   "move down to line 2
    Ä  "and duplicate this line

Vim，7个字节

♥GYPjYp

其中♥是Control-V。

           The cursor starts on the first non-whitespace character of the first line.
♥G         Enter visual block mode and go to bottom of document.
  YP       Duplicate this column.
    j      Move down to the second line of the file.
     Yp    Duplicate this line.

JavaScript（ES6），57 53 52字节

s=>s.replace(/^.(.)/gm,s="$&$1").replace(/(\n.*)/,s)

说明：第一个正则表达式复制第二列，第二个正则表达式复制第二行，因此根据需要放大了该框。编辑：感谢MartinEnder♦，节省了4个字节。

蟒蛇， 49 42字节

匿名lambda：

来自xnor的 -7

lambda s:[t[:2]+t[1:]for t in s[:2]+s[1:]]

先前版本：

D=lambda s:s[:2]+s[1:]
lambda s:D(list(map(D,s)))

D是复制序列第二项的函数。

视网膜，20字节

字节数假定为ISO 8859-1编码。

1`¶
¶$%'¶
%2=`.
$&$&

在线尝试！（有几条额外的线可启用一个测试套件，其中测试用例由两个换行分隔。）

说明

1`¶
¶$%'¶

1是一个限制，限制Retina仅将替换应用于它找到的第一个匹配项。¶匹配单个换行符，因此我们只需要考虑在第一行末尾替换换行符。用替换¶$%'¶，在$%'匹配项后插入整行（视网膜特定的替换元素）。因此，这将复制第二行。

%2=`.
$&$&

在这里，%是每行模式，因此每行都将单独处理，然后再将这些行合并。2=也是一个限制。这意味着“仅将替换应用于第二个匹配项”。匹配项本身很简单，只是一个字符，替换操作会复制它。因此，此阶段复制第二列。

Haskell，24个字节

f(a:b:c)=a:b:b:c
f.map f

使用RootTwo复制第二行和第二列的想法。在map f这样做是为了每一行，并f.随后做这行。

PowerShell v2 +，57 53 52字节

param($n)($n-replace'^.(.)','$&$1')[0,1+1..$n.count]

有点类似于Neil的JavaScript答案。第一个替换匹配行的开头和后两个字符，并用第一个字符和第二个字符两次替换它们。代替第二次替换，它换成了数组索引以复制第二行。将输入作为字符串数组。结果数组切片保留在管道上，并且打印是隐式的。

感谢Martin，节省了4个字节。

一些例子：

PS C:\Tools\Scripts\golfing> .\automatic-box-expander.ps1 ' oooo ','o    o',' oooo '
 ooooo 
o     o
o     o
 ooooo 

PS C:\Tools\Scripts\golfing> .\automatic-box-expander.ps1 ' # ','# #',' # '
 ## 
#  #
#  #
 ## 

Brachylog，28 26字节

2个字节感谢Fatalize。

{bB,?~c[A:C]hl2,A:Bc.}:1a.

在线尝试！

MATL，12字节

tZy"@:2hSY)!

输入为2D字符数组，以分号作为行分隔符。例如，第一个测试用例具有输入

[' OOOO ';'O    O';' OOOO ']

在线尝试！测试用例1，2，3。

说明

该代码执行以下操作两次：重复数组的第二行并转置。

要重复m× n数组的第二行，则将矢量[1 2 2 3 ... m]用作行索引。此向量的生成方式如下：range [1 2 3 ... m]，附加另一个2sort。

t       % Take input implicitly. Duplicate
Zy      % Size of input as a two-element array [r, c]
"       % For each of r and c
  @     %   Push r in first iteration (or c in the second)
  :     %   Generate range [1 2 3 ... r] (or [1 2 3 ... c])
  2hS   %   Append another 2 and sort
  Y)    %   Apply as row index
  !     %   Transpose
        % End for. Display implicitly

Pyth，10个字节

L+<b2tbyMy

在线尝试！

SED 69 19（-r为14 +1）15

s/.(.)/&\1/;2p   

CJam，14个字节

q~{~\_@]z}2*N*

与我的MATL答案类似，但是重复第二排而不是第二排。

在线尝试！

说明

q                e# Read input
 ~               e# Interpret as an array
  {      }2*     e# Do this twice
   ~             e# Dump array contents onto the stack
    \            e# Swap top two elements
     _           e# Duplicate
      @          e# Rotate
       ]         e# Pack into an array again
        z        e# Zip
            N*   e# Join by newlines. Implicitly display

K，15个字节

2{+x@&1+1=!#x}/

将输入作为字符矩阵：

  b: (" OOOO ";"O    O";" OOOO ")
(" OOOO "
 "O    O"
 " OOOO ")

应用函数两次（2{…}/），该函数+通过右x@加（）的增量游程长度解码（&）为索引为（）的右自变量的转置（）提供1+等于1（1=）范围从0到最大（!）正确参数的外部尺寸的大小（#x）。

一步步，

  #b
3
  !#b
0 1 2
  1=!#b
0 1 0
  1+1=!#b
1 2 1
  &1+1=!#b
0 1 1 2
  b@&1+1=!#b
(" OOOO "
 "O    O"
 "O    O"
 " OOOO ")
  +b@&1+1=!#b
(" OO "
 "O  O"
 "O  O"
 "O  O"
 "O  O"
 " OO ")
  2{+x@&1+1=!#x}/b
(" OOOOO "
 "O     O"
 "O     O"
 " OOOOO ")

可以在这里尝试。

APL，17 15字节

{⍉⍵⌿⍨1+2=⍳≢⍵}⍣2

测试：

      smallbox largebox
┌───┬──────┐
│ # │ OOOO │
│# #│O    O│
│ # │O    O│
│   │O    O│
│   │ OOOO │
└───┴──────┘
      {⍉⍵⌿⍨1+2=⍳≢⍵}⍣2 ¨ smallbox largebox
┌────┬───────┐
│ ## │ OOOOO │
│#  #│O     O│
│#  #│O     O│
│ ## │O     O│
│    │O     O│
│    │ OOOOO │
└────┴───────┘

说明：

             ⍣2   run the following function 2 times:
{           }     stretch the box vertically and transpose
         ⍳≢⍵      indices of rows of box
       2=         bit-vector marking the 2nd row
  ⍵/⍨1+           replicate the 2nd row twice, all other rows once
 ⍉                transpose

ListSharp，326个字节

STRG a=READ[<here>+"\\a.txt"]
ROWS p=ROWSPLIT a BY ["\r\n"]
ROWS p=GETLINES p [1 TO p LENGTH-1]
ROWS p=p+p[1]+p[0]
STRG o=p[0]
ROWS y=EXTRACT COLLUM[2] FROM p SPLIT BY [""]
ROWS x=EXTRACT COLLUM[3] FROM p SPLIT BY [""]
[FOREACH NUMB IN 1 TO o LENGTH-1 AS i]
ROWS m=COMBINE[m,x] WITH [""]
ROWS m=COMBINE[y,m,y] WITH [""]
SHOW=m

我绝对需要添加函数的嵌套，但是效果很好

如果您需要解释，请发表评论

JavaScript中，160个 146 141字节

s=>{a=s[1];r="";l=s.split("\n");m=l.length;n=l[0].length;for(i=0;i<=m;i++){for(j=0;j<=n;j++)r+=!(i%m)&&j%n||i%m&&!(j%n)?a:" ";r+="\n"}return r}

Dyalog APL，14 个字节

(1 2,1↓⍳)¨∘⍴⌷⊢

(

1 2, {1，2}前置

1↓ 从中删除一个元素

⍳ 指标

)¨ 每个

∘ 的

⍴ {行数，列数}

⌷ 索引到

⊢ 论点

例如

 XX
X  X
 XX

我们找到索引；{1，2，3}代表行，{1，2，3，4}代表行。现在，我们删除初始元素以获得{2，3}和{2，3，4}，然后以{1，2}开头，得到{1,2,2,3}和{1,2,2 3，4}。最后，我们使用它来选择行和列，同时将第2行和第2列加倍。

在线尝试APL！

Ruby，46个字节

->a{a.map{|r|r.insert(2,r[1])}.insert(2,a[1])}

非常简单的解决方案，将输入作为行数组。我不喜欢重复insert的，所以会尝试打高尔夫球。

C＃，127124字节

s=>{int n=s.Count-1,i=0;s[0]=s[n]=s[0].Insert(1,s[0][1]+"");s.Insert(1,s[1]);for(;i++<n;)s[i]=s[i].Insert(1," ");return s;};

编译为 Func<List<string>, List<string>>。

格式化版本：

s =>
{
    int n = s.Count - 1, i = 0;

    s[0] = s[n] = s[0].Insert(1, s[0][1] + "");

    s.Insert(1, s[1]);

    for (; i++ < n;)
        s[i] = s[i].Insert(1, " ");

    return s;
};