あなたは、文字列をネスト機能生成しなければならないs配列内、n回

>>> N("stackoverflow",2)
[['stackoverflow']]

パラメーター：

1. s -アスキー文字列
2. n -整数 >= 0

ルール

• 最短のコードが優先されます。
• 出力は、ネストされたarray、listまたはtuple（または配列に基づく同様のタイプ）になります

テストケース

>>> N("stackoverflow",0)
'stackoverflow'
>>> N("stackoverflow",1)
['stackoverflow']
>>> N("stackoverflow",5)
[[[[['stackoverflow']]]]]

_{インスピレーション：リスト内の文字列をn回ネストする、つまりリストのリストのリスト}

ゼリー、2 バイト

W¡

（1）Jellyには文字列がなく、文字のリストしかありません。および（2）; 出力はネストを表示しません。これが実際に求められていることを実行していることを確認するには、結果のPython文字列表現を見てください：

W¡ŒṘ

[]文字列自体が文字のリストになるため、余分なペアが存在します。例えば

どうやって？

W¡ - Main link: s, n
W  - wrap left, initially s, in a list
 ¡ - repeat previous link n times

概念実証コードは以下を追加します。

W¡ŒṘ - Main link: s, n
  ŒṘ - Python string representation

JavaおよびC＃、62バイト

Object f(String s,int n){return n<1?s:new Object[]{f(s,n-1)};}

JavaとC＃の両方で修正なしで動作するはずです。

05AB1E、3バイト

コード

`F)

説明

`   # Flatten the input array on the stack.
 F  # Element_2 times do:
  ) # Wrap the total stack into a single array.

これは、文字列がすでにスタック上にあるため、これが0テストケースでも機能することを意味します。

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

JavaScript（ES6）、20バイト

d=>g=n=>n--?[g(n)]:d

通常、1バイトの節約のために機能をカレーするように言われますが、これは実際にソリューションに貢献するケースです。

Mathematica、13バイト

List~Nest~##&

CJam、7 6バイト

{{a}*}

オンライン通訳

これは、文字列でありラップであるとしてS N、スタックから引数を受け取る名前のない関数です。evalを意味する演算子で実行できます。SN~

説明：

{{a}*}
{      Open block    [A B]
 {     Open block    [A]
  a    Wrap in array [[A]]
   }   Close block   [A B λwrap]
    *  Repeat        [A:wrap(*B)]
     } Close block   ["S" N λ(λwrap)repeat]

Javascript ES6、23バイト

再帰関数

f=(a,i)=>i?f([a],--i):a

console.log(f("stackoverflow",0))
console.log(f("stackoverflow",1))
console.log(f("stackoverflow",2))
console.log(f("stackoverflow",5))

同じ長さのカレー結果

f=a=>i=>i?f([a])(--i):a

Brachylog、10バイト

tT,?h:T:gi

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

説明

tT,            T is the integer (second element of the Input)
   ?h:T:g      The list [String, T, built-in_group]
         i     Iterate: Apply built-in_group T times to String

バグがなければ3バイトになります。ここでは、リストを取得するには、このすべてを必要とする[String, T, built-in_group]にもかかわらず、[String, T]すでに我々が入力されます。

残念なことに、整数は最初のリスト内にあるため、によって:g直接[[String, T], built-in_group]認識されません。iT

MATL、6バイト

ji:"Xh

これにより、ネストされたセル配列が出力として生成されます。ただし、MATLのデフォルトの表示では、中括弧のすべてが表示されるわけではないため、それが何であるかを確認する必要はありません。以下のデモは、出力の文字列表現を示すわずかに変更されたバージョンです。

ji:"Xh]&D

オンラインで試す

説明

j       % Explicitly grab the first input as a string
i       % Explicitly grab the second input as an integer (n)
:"      % Create an array [1...n] and loop through it
    Xh  % Each time through the loop place the entire stack into a cell array
        % Implicit end of for loop and display

パイク、3バイト

V]1

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

Pyth、3バイト

]Fw

パーマリンク

これはのようなものを出力します...[[[[['string']]]]]...。深さがゼロの場合は引用しません：string。

説明：

]Fw
   Q Implicit: Eval first input line
]    Function: Wrap in array
  w  Input line
 F   Apply multiple times

深さゼロでクォートする場合は、代わりにこの4バイトのソリューションを使用します（説明）：

`]Fw
    Q Implicit: Eval first input line
 ]    Function: Wrap in array
   w  Input line
  F   Apply multiple times
`     Representation

PHP、60バイト

for($r=$argv[1];$i++<$argv[2];)$r=[$r];echo json_encode($r);

タスクのように見える場合は48バイト

for($r=$argv[1];$i++<$argv[2];)$r="[$r]";echo$r;

ルビー：23バイト

->n,s{n.times{s=[s]};s}

これは、元のスニペットではなく、呼び出し可能なProcになるように更新されています。s明示的に返すのではなく、暗黙的に返す方法があるかどうかを知りたいと思います。

C、44バイト、41バイト

int*n(int*s,int a){return a?n(&s,a-1):s;}

以下を実行してテストできます。

int main(void) {
    char* s = "stackoverflow";

    /* Test Case 0 */
    int* a = n(s,0);
    printf("'%s'\n", a);

    /* Test Case 1 */
    int* b = n(s,1);
    printf("['%s']\n", *b);

    /* Test Case 2 */
    int** c = n(s,2);
    printf("[['%s']]\n", **c);

    /* Test Case 3 */
    int*** d = n(s,3);
    printf("[[['%s']]]\n", ***d);

    /* Test Case 4 */
    int********** e = n(s,10);
    printf("[[[[[[[[[['%s']]]]]]]]]]\n", **********e);

    return 0;
}

出力：

'stackoverflow'
['stackoverflow']
[['stackoverflow']]
[[['stackoverflow']]]
[[[[[[[[[['stackoverflow']]]]]]]]]]

もちろん、警告が表示されます。これgccは、Windowsマシンのbash（gcc version 4.8.4 (Ubuntu 4.8.4-2ubuntu1~14.04.3)、および真のLinuxマシン（gcc version 4.6.3 (Ubuntu/Linaro 4.6.3-1ubuntu5)）でも機能します。

Python、32バイト

N=lambda s,n:n and[N(s,n-1)]or s

ルビー、25文字

書き換えjamylakのPythonのソリューション。

f=->s,n{n>0?[f[s,n-1]]:s}

サンプル実行：

irb(main):001:0> f=->s,n{n>0?[f[s,n-1]]:s}
=> #<Proc:0x00000002006e80@(irb):1 (lambda)>

irb(main):002:0> f["stackoverflow",0]
=> "stackoverflow"

irb(main):003:0> f["stackoverflow",1]
=> ["stackoverflow"]

irb(main):004:0> f["stackoverflow",5]
=> [[[[["stackoverflow"]]]]]

C＃6、50バイト

dynamic a(dynamic s,int n)=>n<2?s:a(new[]{s},n-1);

ルビー、24バイト

f=->*s,n{s[n]||f[s,n-1]}

manatwork's answerと同じですが、実装は奇妙です。*s入力（ネストされている可能性のある文字列）を配列にラップします。次に、nがゼロの場合、s[n]の最初の要素を返しs、関数を何もしません それ以外の場合は、要素が1つだけになるnilため、戻りますs。そのため、再帰呼び出しにパススルーします。

V、6バイト

Àñys$]

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

説明：

À      "Arg1 times
 ñ     "repeat:
  ys$  "surround this line
     ] "with square brackets

Perl 6、23バイト

{($^a,{[$_]}...*)[$^b]}

拡張：

{ # bare block lambda with two placeholder parameters ｢$a｣ and ｢$b｣
  (

    # generate Sequence

    $^a,       # declare first input
    { [ $_ ] } # lambda that adds one array layer
    ...        # do that until
    *          # Whatever

  )[ $^b ]     # index into the sequence
}

Agda、173バイト

関数の戻り値の型は引数として指定された数値に依存するため、これは明らかに依存型付き言語を使用する必要がある場合です。残念なことに、ゴルフは、ナチュラルとリストをインポートして使用する必要がある言語では簡単ではありません。プラス面では、彼らsucは私が冗長を期待していた場所を使用しますsucc。だからここに私のコードがあります：

module l where
open import Data.List
open import Data.Nat
L : ℕ -> Set -> Set
L 0 a = a
L(suc n)a = List(L n a)
f : ∀ n{a}-> a -> L n a
f 0 x = x
f(suc n)x = [ f n x ]

（私は、スペースを省略することができるすべての場所を見つけたいと考えています。）L自然与えられたことをタイプ機能であるnと型aのタイプを返すnリストのネストされた時間はa、それほどL 3 BoolのリストのリストのリストのタイプになりますBool（私たちが持っていた場合インポート済みBool）。これにより、関数のタイプを次のように表現できます。(n : ℕ) -> {a : Set} -> a -> L n a。ここで、中括弧はその引数を暗黙的にします。コードは、このタイプを記述するために短い方法を使用します。関数は、最初の引数でパターンマッチングを行うことにより、明白な方法で定義できるようになりました。

このファイルに.agda拡張子を付けてemacsにロードすると、C-c C-nたとえば（通常の形式に用語を評価する）を使用し、入力f 2 3して、厄介な形式で正しい答えを取得できます(3 ∷ []) ∷ []。もちろん、文字列でそれをしたい場合は、それらをインポートする必要があります...

k、3バイト

,:/

二項関数としてとられ/、左辺関数,:（enlist）を2番目の引数にn回繰り返し適用します。

例：

k),:/[3;"hello"]
,,,"hello"

PHP、44バイト

function n($s,$n){return$n?n([$s],--$n):$s;}

洗練されたものではなく、単なる再帰関数

Python 2、32バイト

lambda s,n:eval('['*n+`s`+']'*n)

プットは、n文字列の前にブラケットと開くnそれは、その結果を試用版とその前にクローズブラケットを。文字列出力が許可されている場合、eval削除できます。

実際には、4バイト

入力は stringた後n。ゴルフの提案を歓迎します。オンラインでお試しください！

`k`n

アンゴルフ

          Implicit input string, then n.
`...`n    Run the function n times.
  k         Wrap the stack in a list.
          Implicit return.

R、 39 40バイト

編集：n=0@rturnbullのおかげで問題を修正しました。

2つの入力s（文字列）とn（ネスト）を受け取り、ネストされたリストを出力する関数。Rクラスlistは、他のほとんどの言語とは異なる方法でネイティブに出力を印刷しますが、機能的にはキー/値マップ（名前のないキーを含む）またはPythonのリストに似ていることに注意してください。

f=function(s,n)if(n)list(f(s,n-1))else s

例

> f=function(s,n)if(n)list(f(s,n-1))else s
> f("hello",3)
[[1]]
[[1]][[1]]
[[1]][[1]][[1]]
[1] "hello"


> # to access the string nested 5 times in the "list-object" named "list" we can do the following
> list = f("nested string",5)
> list[[1]][[1]][[1]][[1]][[1]]
[1] "nested string"

ラケット83バイト

(for((c n))(set! s(apply string-append(if(= c 0)(list"[\'"s"\']")(list"["s"]")))))s

ゴルフをしていない：

(define (f s n)
  (for ((c n))
    (set! s (apply string-append
                   (if (= c 0)
                       (list "[\'" s "\']")
                       (list "[" s "]"))
                   )))
  s)

テスト：

(f "test" 3)

出力：

"[[['test']]]"

Haskell、40 38バイト

data L=N[Char]|C L 
f 0=N
f n=C. f(n-1)

Haskellの厳密な型システムは、異なる型（文字列対文字列のリスト対文字列のリストなど）を返すことを防ぎます。そのため、これらすべてのケースに対応する独自の型を定義する必要があります。メイン関数fは、ネストとベースケースのnコンストラクターCを再帰的に呼び出しますN。

使用例（印刷できるようにderiving (Show)新しいdataタイプに追加）：f 4 "codegolf"-> C (C (C (C (N "codegolf"))))。

編集：@Christian Sieversは、文字列引数の関数をポイントフリースタイルで書き換えることにより2バイトを節約しました。ありがとう！

tinylisp（repl）、34バイト

(d F(q((S N)(i N(F(c S())(s N 1))S

関数を定義しますF。技術的には、tinylispには文字列はありませんが、このコードは指定されたデータ型に対して機能します。

Ungolfed（組み込みのキー：d=定義、q=引用、i= if、c= cons、s=減算）：

(d nest
 (q
  ((item number)
   (i number
    (nest (c item ()) (s number 1))
    item))))

使用例：

tl> (d F(q((S N)(i N(F(c S())(s N 1))S
F
tl> (F 2 3)
(((2)))
tl> (F () 1)
(())
tl> (F (q Hello!) 7)
(((((((Hello!)))))))
tl> (F c 3)
(((<builtin function tl_cons>)))

Clojure、24バイト

#(nth(iterate list %)%2)

Clojureはここでいくらか競争力があります。iterateシーケンス作成しx, (f x), (f (f x)) ...、nthリターンに必要な要素を。

オンラインで見る： https //ideone.com/2rQ166