チャレンジ：

入力：正の整数$n$

出力：

範囲でリストを作成し、それを文字列に結合します（つまり、が文字列になります）。$[1,n]$$n=13$12345678910111213

次に、この文字列のプレフィックスまたはサフィックスを使用して、入力整数に基づいて次の4つの方向のいずれかで三角形を出力します。

• もし$n\equiv 0\pmod 4$、三角形状の出力を◣
• もし$n\equiv 1\pmod 4$、三角形状の出力を◤
• もし$n\equiv 2\pmod 4$、三角形状の出力を◥
• もし$n\equiv 3\pmod 4$、三角形状の出力を◢

例：

入力：$n=13$

ので、$13\equiv 1\pmod 4$、形状が◤あろう。ここでは、3つの有効な出力が考えられます。

12345678910111213    11111111111111111    12345678910111213
1234567891011121     2222222222222222     2345678910111213
123456789101112      333333333333333      345678910111213
12345678910111       44444444444444       45678910111213
1234567891011        5555555555555        5678910111213
123456789101         666666666666         678910111213
12345678910          77777777777          78910111213
1234567891           8888888888           8910111213
123456789            999999999            910111213
12345678             11111111             10111213
1234567              0000000              0111213
123456               111111               111213
12345                11111                11213
1234                 1111                 1213
123                  222                  213
12                   11                   13
1                    3                    3

チャレンジルール：

• 上記の3つの有効な出力を見るとわかるように、正しい形状とすべての数字を正しい順序で使用することが重要です。それとは別に、プレフィックスまたはサフィックスを自由に使用できます。反転/反映; 斜め印刷; など。各シェイプの6つの可能な出力のいずれかが許可されます（シェイプに基づくすべての有効な出力を確認するには、以下のテストケースを参照してください）。これにより、回転ビルトインを使用する言語で使用できますが、上から下に正しいサイズのプレフィックスを使用するか、2つの形状のプレフィックスを使用して他の2つの形状のサフィックスを使用する代替アプローチを使用することもできます。あなたの言語に最適な出力オプションを選択することは、ゴルフのプロセスの一部です。:)
• 入力は正の整数であることが保証されています。以下のため、我々は単に出力。$n=1$1
• 画面のどこかに正しい三角形（垂直または水平の区切り文字なし！）を印刷する限り、任意の量の先頭/末尾の改行/スペースを使用できます。

一般的なルール：

• これはcode-golfであるため、バイト単位の最短回答が優先されます。
  コードゴルフ言語では、非コードゴルフ言語で回答を投稿しないようにしてください。「任意の」プログラミング言語の可能な限り短い答えを考えてみてください。
• デフォルトのI / Oルールを使用した回答には標準ルールが適用されるため、STDIN / STDOUT、関数/メソッド、適切なパラメーターおよび戻り値型、完全なプログラムを使用できます。あなたの電話。
• デフォルトの抜け穴は禁止されています。
• 可能であれば、コードのテスト（TIOなど）へのリンクを追加してください。
• また、回答の説明を追加することを強くお勧めします。

テストケース：

入力： すべての有効な出力：$n=5$

12345    54321    12345    54321    11111    55555
1234     5432     2345     4321     2222     4444
123      543      345      321      333      333
12       54       45       21       44       22
1        5        5        1        5        1

入力： すべての可能な出力：$n=6$

123456    654321    123456    654321    111111    666666
 12345     65432     23456     54321     22222     55555
  1234      6543      3456      4321      3333      4444
   123       654       456       321       444       333
    12        65        56        21        55        22
     1         6         6         1         6         1

入力： すべての可能な出力：$n=7$

      1          1          7          7          7          1
     12         21         67         76         66         22
    123        321        567        765        555        333
   1234       4321       4567       7654       4444       4444
  12345      54321      34567      76543      33333      55555
 123456     654321     234567     765432     222222     666666
1234567    7654321    1234567    7654321    1111111    7777777

入力： すべての可能な出力：$n=8$

1           1           8           8           8           1
12          21          78          87          77          22
123         321         678         876         666         333
1234        4321        5678        8765        5555        4444
12345       54321       45678       87654       44444       55555
123456      654321      345678      876543      333333      666666
1234567     7654321     2345678     8765432     2222222     7777777
12345678    87654321    12345678    87654321    11111111    88888888

入力： 可能な出力のみ：$n=1$

1

入力： すべての可能な出力：$n=2$

12    21    12    21    11    22
 1     2     2     1     2     1

JavaScript（ES6）、 93  89バイト

文字のマトリックスを返します。

n=>[...(g=n=>n?g(n-1)+n:'')(n)].map((d,y,a)=>a.map(_=>y-(n&2)*y--<0?' ':d)).sort(_=>-n%2)

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

代替パターン（同じサイズ）：

n=>[...(g=n=>n?g(n-1)+n:'')(n)].map((_,y,a)=>a.map(d=>y-(n&2)*y--<0?' ':d)).sort(_=>-n%2)

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

コメント済み

n =>                 // n = input
  [...               // split the result of ...
    ( g = n =>       //   ... a call to the recursive function g, taking n
      n ?            //     if n is not equal to 0:
        g(n - 1)     //       append the result of a recursive call with n - 1
        + n          //       append n
      :              //     else:
        ''           //       stop recursion and return an empty string
    )(n)             //   initial call to g
  ].map((d, y, a) => // for each digit d at position y in this array a[]:
    a.map(_ =>       //   for each character in a[]:
      y -            //     we test either y < 0 if (n AND 2) is not set
      (n & 2)        //     or -y < 0 (i.e. y > 0) if (n AND 2) is set
      * y-- < 0      //     and we decrement y afterwards
      ?              //     if the above condition is met:
        ' '          //       append a space
      :              //     else:
        d            //       append d
    )                //   end of inner map()
  )                  // end of outer map()
  .sort(_ => -n % 2) // reverse the rows if n is odd

形状の概要

以下は、各の基本形状（ネストされたmapループによって生成される）と最終形状（の後）の概要です。sort$n\bmod 4$

 n mod 4  | 0     | 1     | 2     | 3
----------+-------+-------+-------+-------
 n & 2    | 0     | 0     | 2     | 2
----------+-------+-------+-------+-------
 test     | y < 0 | y < 0 | y > 0 | y > 0
----------+-------+-------+-------+-------
 base     | #.... | #.... | ##### | #####
 shape    | ##... | ##... | .#### | .####
          | ###.. | ###.. | ..### | ..###
          | ####. | ####. | ...## | ...##
          | ##### | ##### | ....# | ....#
----------+-------+-------+-------+-------
 n % 2    | 0     | 1     | 0     | 1
----------+-------+-------+-------+-------
 reverse? | no    | yes   | no    | yes
----------+-------+-------+-------+-------
 final    | #.... | ##### | ##### | ....#
 shape    | ##... | ####. | .#### | ...##
          | ###.. | ###.. | ..### | ..###
          | ####. | ##... | ...## | .####
          | ##### | #.... | ....# | #####

Python 2、94バイト

n=0;s=''
exec"n+=1;s+=`n`;"*input()
K=k=len(s)
while k:k-=1;print s[k^n/-2%-2:].rjust(n%4/2*K)

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

Japt、8バイト

行の配列を返します。

õ ¬å+ zU

それを試してみてください

Kevinのおかげで2バイト節約されました。

õ ¬å+ zU     :Implicit input of integer U
õ            :Range [1,U]
  ¬          :Join to a string
   å+        :Cumulatively reduce by concatenation
      zU     :Rotate clockwise by 90 degrees U times

Canvas、8 バイト

ŗ］∑［］⁸［↷

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

Perl 6、94バイト

{[o](|(&reverse xx$_/2+.5),|(*>>.flip xx$_/2+1))([\~](my@a=[~](1..$_).comb)>>.fmt("%{+@a}s"))}

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

数字を受け取って行のリストを返す匿名コードブロック。

炭、17バイト

Ｎθ≔⭆θ⊕ιηＧLＬηη⟲⊗θ‖

オンラインでお試しください！リンクは、コードの詳細バージョンです。説明：

Ｎθ

入力n。

≔⭆θ⊕ιη

数字1をに連結して文字列を作成しますn。

ＧLＬηη

その長さの三角形を文字列で塗りつぶします。

⟲⊗θ

三角形を反時計回りにn*90度単位で回転させます。

‖

すべてを反映し、その結果、時計回りにn*90角度で回転する三角形になります。

C＃（Visual C＃Interactive Compiler）、128バイト

n=>{var s="";int i=0,j,p;for(;i<n;s+=++i);for(p=j=s.Length;;)Write("{0,"+(n%4>1?p:0)+"}\n",new string(s[--j],-~n%4>1?j+1:p-j));}

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

ルビー、95 82 79バイト

->n{r=(0...z=/$/=~s=[*1..n]*'').map{|i|" "*n[1]*i+s[0,z-i]};-n&2>0?r:r.reverse}

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

G Bによって保存された3バイト

R、152の 139 137 134バイト

function(n,N=nchar(s<-Reduce(paste0,1:n,'')),A=!n%%4%%3)for(i in 1:N)cat(rep('',(M=c(N-i+1,i))[1+!A]*(n%%4>1)),substr(s,1,M[1+A]),'
')

展開されたコード：

function(n){
  s = Reduce(paste0,1:n,'')      # concat the digits from 1 to n into a string s

  N = nchar(s)                   # store the length of s

  A = !n%%4%%3                   # A = TRUE if n MOD 4 == 1 or 2 

  for(i in 1:N){                 # for 1 to N (length of s)

    M = c(N-i+1,i)               # store N-i+1 and i into a vector

    nSpaces = M[1+!A]*(n%%4>1)   # if n MOD 4 == 1 or 2 then nSpaces = i else nSpaces = N-i+1, 
                                 # but if n MOD 4 == 0 or 1, then force nSpaces = 0

    nDigits = M[1+A]             # if n MOD 4 == 1 or 2 then nDigits = N-i+1 else nDigits = i

    prfx = rep('',)              # create a character vector repeating '' nSpaces times

    sufx = substr(s,1,M[1+A])    # substring s by taking the first nDigits characters

    cat(pr,su,'\n')              # print prfx and sufx using space as separator for the values 
                                 # contatenation (cat function default) and append a newline
  }

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

APL + WIN、45バイト

整数のプロンプト

m←⊃(⍳⍴s)↑¨⊂s←(⍕⍳n←⎕)~' '⋄⍎(' ⊖⍉⌽'[1+4|n]),'m'

オンラインでお試しください！Dyalog Classic提供

PowerShell、108バイト

param($n)0..($y=($x=-join(1..$n)).length-1)|%{' '*(0,0,$_,($z=$y-$_))[$n%4]+-join$x[0..($_,$z,$z,$_)[$n%4]]}

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

エッジの周りが少し荒いが、機能する。数字1〜をn文字列に結合し、0からその文字列-1の長さまで繰り返します。毎回、リストインデックスを使用して、新しい文字列をスライスするために使用される正しい間隔方法と番号範囲に切り替えます。

ゼリー、12バイト

D€Ẏ;\z⁶U$⁸¡Y

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

05AB1E（レガシー）、14 12 10バイト

なんらかの理由で、レガシーバージョンをリライトとして使用すると、これが非常に遅くなります。

Kevin Cruijssenのおかげで2バイト節約

LSηsFRζ}J»

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

説明

L           # push range [1 ... input]
 S          # split to list of individual digits
  η         # calculate prefixes
   sF  }    # input times do:
     R      # reverse list
      ζ     # and transpose it
        J   # join to list of strings
         »  # and join on newlines

スタックス、10 バイト

Ç√çZ╟84Γó║

実行してデバッグする

PowerShell、105 101 95バイト

-4バイトは、Arnauld がSortのトリックに感謝します。

param($n)($x=1..$n-join'')|% t*y|%{($s+="$_")}|sort -d:($n%4-in1,2)|% *ft($x.Length*($n%4-ge2))

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

少ないゴルフ：

param($n)
$x=1..$n-join''
$x|% toCharArray |% {
    ($s+="$_")
} | sort -Descending:($n%4-in1,2) |% PadLeft ($x.Length*($n%4-ge2))

R、175の 172 154バイト

function(n)write(c(" ",0:9)[1+(x=utf8ToInt(Reduce(paste0,1:n,""))-47)*!upper.tri(diag(y<-sum(x|1)))["if"(n%%4>1,1:y,y:1),"if"(!n%%4%%3,y:1,1:y)]],1,y,,"")

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

恐ろしいインライン混乱！

回転条件を変更して-3バイト

digEmAllの提案のおかげで-17バイト、さらにゴルフをした後のもう1バイト

Wolfram言語（Mathematica）、137バイト

(t=Table[Table[" ",If[(m=#~Mod~4)>1,Tr[1^s]-k,0]]<>ToString/@s[[;;k]],{k,Length[s=Join@@IntegerDigits/@Range@#]}];If[0<m<3,Reverse@t,t])&

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

Python 2、116バイト

n=input()
s=''.join(map(str,range(1,n+1)));L=len(s)
p=-~n/2%2;i=~-L*p+1
exec'print s[:i].rjust(n/2%2*L);i+=1-2*p;'*L

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

赤、155バイト

func[n][b: copy""repeat i n[append b i]repeat i l:
length? b[t:[l - i + 1]set[k m]pick[i t[l t][l i]]n % 4 + 1
print pad/left copy/part b do do m do do k]]

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

perl 5、117バイト

$p=$_++&2?'/ ':'$/';$s='(.*\d.\n)';$r=$_--&2?$s.'\K$':"^(?=$s)";$_=(join"",1..$_).$/;1while s,$r,'$1=~s/\d'."$p/r",ee

TIO

PHP、116 111 109バイト

for($m=$l=strlen($s=join(range(1,$n=$argn)));$l--;)printf('%'.($n&2?$m:-$l).'.'.($n-1&2?$m-$l:$l+1)."s
",$s);

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

php -nFからの入力で実行しますSTDIN。

$ echo 6|php -nF t.php

123456
 12345
  1234
   123
    12
     1

JAVA（JDK） 、247の 209 188 186 160 148バイト

i->{String s="";int l=0,w;for(;l<i;s+=++l);for(w=s.length(),l=0;l<w;)System.out.printf("%"+(1>i%4/2?1:w)+"s\n",s.substring(0,1>~-i%4/2?w-l++:++l));}

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

-38 bytesパディング
-21 bytesをprintf処理できる@KevinCruijssenに感謝します。
-2 bytes置換前に部分文字列を実行することで、l2つではなく1つの場所でインクリメントできます。
-26 bytes- printfパディングを行うと、スペースでいっぱいの文字列は不要になり、数字の文字列は明らかに短い方法で生成できました。
-12 bytes私たちがすでに持っている完全にサービス可能な数字列の部分文字列を印刷する代わりに、1桁の数字をいじらないことによって。

非ゴルフ

input->{
    // Lambda expression with target type of IntConsumer
    String allDigits = "";
    int lineLength, line = 0;

    // Collect a list of all digits in order.
    for (;line < input; allDigits += ++line) {}

    // Save the max length of a line, and create a string of that many spaces.
    for (lineLength=allDigits.length(), line=0; line < lineLength;) {
        System.out.printf(   "%" // construct a format string to handle the padding
                           + (   1 > input%4/2
                               ? 1 // No padding
                               : w // Yes padding
                             )
                           + "s\n"
                         , allDigits.substring( 0
                                              ,   1 > (i-1)%4/2
                                                ? w - l++
                                                : ++l
                                              ) // A string containing only the digit we want.
                         );
    }
}