技术指标

给定一个数字n，输出大小为的ASCII“模因箭头”（大于符号，>）n。

n 始终是一个大于0的正整数。

例子

n = 2

\
 \
 /
/

n = 5

\
 \
  \
   \
    \
    /
   /
  /
 /
/

样例代码

这是一个用Crystal编写的示例程序，可以返回正确的结果。以方式运行./arrow 10。

arrow.cr：

def f(i)
        i.times { |j|
                j.times { print ' ' }
                puts "\\"
        }
        i.times { |j|
                (i-j-1).times { print ' ' }
                puts '/'
        }
end

f(ARGV[0].to_i)

规则

这是代码高尔夫球。最短的答案将获胜。但是，我不会选择答案，因为最短的答案可能会随着时间而变化。
不允许出现标准漏洞。

code-golf ascii-art

— 德库德里阿夫采夫
source

1

您确定这不是重复项（也就是说，您是否对此进行了沙箱处理）？我认为这可能是可能的，但几乎没有可能进行搜索。

— 我的代词是monicareinstate '19

1

可以n为零吗？

— xnor19

6

我认为将此通用符号称为“模因箭头”是很愚蠢的。他们显然是喜剧人字形。

— 散

4

@Christian他们实际上是在逗角

— dkudriavtsev

1

@ArtemisFowl我认为这是有趣的增长

— dkudriavtsev

12

画布，2 个字节

＼═

在这里尝试！

— 宰马
source

1

代码本身实际上就像是微笑。

— 瓦尔说，请恢复莫妮卡（Monica）

8

C（gcc），56个字节

f(n,i){for(i=-n;n;printf("%*c\n",i?++i+n:n--,i?92:47));}

在线尝试！

f(n,i){for(i=-n;i;printf("%*c\n",  ++i+n    ,  92   ));     //first print descending '\'s
       for(    ;n;printf("%*c\n",        n--,     47));}    // then print returning  '/'s

— Attinat
source

6

Python 2，54个字节

f=lambda n,p='':n*'?'and p+'\\\n'+f(n-1,p+' ')+p+'/\n'

在线尝试！

输出带有尾随换行符。

— 异或
source

5

05AB1E，6个字节

'\3.Λ∊

在线尝试！

说明

   .Λ    # draw
'\       # the string "\"
         # of length input
  3      # in the south-eastern direction
     ∊   # then vertically mirror it

— 艾米尼亚
source

4

C＃（Visual C＃交互式编译器），66字节

n=>new int[n*2].Select((a,b)=>"".PadLeft(b<n?b:n*2+~b)+"\\/"[b/n])

感谢@someone，节省了一个字节。

在线尝试！

— 无知的体现
source

1

n*2-b-1->n*2+~b

— 我的代词是monicareinstate，

4

C64Mini / C64 BASIC（和其他CBM BASIC变体），使用了52个标记化的BASIC字节

 0INPUTN:N=N-1:FORI=0TON:PRINTTAB(I)"\":NEXT:FORI=NTO0STEP-1:PRINTTAB(I)"/":NEXT

这是用于移植的非混淆版本：

 0 INPUT N
 1 LET N=N-1
 2 FOR I=0 TO N
 3  PRINT TAB(I);"\"
 4 NEXT I
 5 FOR I=N TO 0 STEP -1
 6  PRINT TAB(I);"/"
 7 NEXT I

N由于TAB命令是零索引的，因此在第零行中输入的数字都会减少一。FOR/NEXT如果meme箭头分别在第二行至第四行和第五行至七行中的循环输出上部和下部（由图形模式源中的Shifted M和Shifted 表示）N

— 肖恩·贝伯斯
source

1

您是否知道在Commodore Basic中所有关键字都可以缩写？这是链接：c64-wiki.com/wiki/BASIC_keyword_abbreviation 例如，for可以是fO（f-shoft o），printis ?等

— 。– gaborsch

1

52个字节在Code Golf中具有误导性，二进制文件不算在内，只是源代码。应该这样：0inputn:n=n-1:fOi=0ton:?tA(i)"\":nE:fOi=0ton:?tA(i)"/":nE-占用57个字节。

— gaborsch

1

正如这里讨论的-> codegolf.meta.stackexchange.com/questions/11553/…我计算使用的令牌，因为这更能代表正在使用多少内存。

— Shaun Bebbers

1

哦，我不知道。对此有决定吗？甚至答案都没有被接受。

— gaborsch

1

我的第一台计算机是C16，我也为此进行了很多组装，所以没有犯错，我爱Commodore。C16有Basic 3,5，每行80个字符，我也有一本书，上面有ROM清单的说明，所以我完全知道

— 令牌

4

MarioLANG，719个 677字节

+
+
+
+
+
+         ((((+)+++++)))<
+>======================"
+)++++++)+++++++++++((-[!)
========================#=-
) ![-    <+;)+++)---)++++)<
)=#======"=================
) >)+)+((!
+ "======#
         <))))).(((((((<
 ========">============"
>)+)+((-[!+))        -[!((((((((.)).))))+(-[!)
"========#=============#====================#<
!)                                          <
#==========================================="
                  >(((((.)))>
                  "========<"========
 ![-)).))).(((((((![-    ))+![-((+)+)<((![<
 #================#=========#========"==#="===
 >                                   !  >-!
 "===================================#  "=#

在线尝试！

这比预期的要难...

— 查理
source

4

brainfuck，125个字节

++++++++++[->+>+++++++++>+++<<<]>>++>++>,[->[->+<<<.>>]<<<.<.>>>>>[-<+>]<+<]<<[--<<+>>]<<+>>>>>[-[-<+<.>>]<<<<<.>.>>>[->+<]>]

在线尝试！

++++++++++[->+>+++++++++>+++<<<]>>++>++>    ; Initialize with " \"
,                                           ; Get input
[->                                         ; loop and decrement n 
    [->+<<<.>>]                             ; output number of spaces, copy n
    <<<.                                    ; output \
    <.                                      ; output newline
    >>>>                                    
    >[-<+>]<+                               ; copy copy of n back to original place 
<]
<<[--<<+>>]<<+>>                            ; change "\" to "/"
>>>                             
[                                           ; second loop for bottom half
 -                                          ; decrement n
 [-<+<.>>]                                  ; output n spaces
 <<<<<.>.                                   ; output \ and newline
 >>>[->+<]>                                 ; copy n back
]

— 海伦娜
source

4

Ruby，111 99 77 73 68 64 57 56字节

-12个字节要感谢Benjamin Urquhart，-43个要感谢manatwork，-2个字节要感谢Value Ink。

->i{s=[];puts (0...i).map{|j|s=(p=' '*j)+?/,*s;p+?\\},s}

在线尝试！

说明：

f=->i{                      # instead of a function, use a lambda
  s=[]                      # needs a helper variable *now*, for scope
  puts(                     # puts takes arbitrary num of args; \n after each
    (0...i).map{|j|         # not from 0 to i but from 0 to i-1 (*three* dots)
      s=(
        p=' '*j             # p will remain in scope inside of .map,
      )
      +?/                   # character literal instead of string
      ,*s                   # essentially appending to the array

      p+?\\                 # p is what's returned by .map, not s!

    },                      # up until here, 1st arg to display
    s                       # NOW, as the *2nd* arg, s is displayed
  )
}

替代（但更长）的解决方案

一个朋友读了这个答案，然后尝试提出另外两种方法。也将它们放在此处，以免它们被庞大的互连网所迷失。

注入和取消移位，72字节

->n{puts (0...n).inject([]){|s,i|i=' '*(n-1-i);s.unshift i+?\\;s<<i+?/}}

在线尝试！

向下，注入和取消移位，80字节

->n{puts n.downto(1).map{|i|' '*(i-1)}.inject([]){|s,i|s<<i+?/;s.unshift i+?\\}}

在线尝试！

有趣的两个非嵌套循环，127个字节

->n{
r=->s,c{s[0..-(c+1)],s[-c..-1]=s[c..-1],s[0..c-1];s};
n.times{|i|puts r[' '*n+?\\,n-i]}
n.times{|i|puts r[' '*n+?/,i+1]}
}

在线尝试！

— 六十五
source

不能删除很多空白吗？

— 本杰明·厄克特

1

是的，总共12个字节，谢谢！这是我第一次向代码高尔夫球比赛提交任何内容……

— 六十五周年（

然后，您可能会发现有趣的Ruby高尔夫技巧，甚至是<all language>高尔夫技巧。

— manatwork

您可以将内部循环替换为String#rjust（在线尝试！）。

— manatwork

在这里，我应用了上述2个集合中的一些技巧，将其减少到57个字符：在线尝试！

— manatwork

3

Perl 5，36 `-p`个字节

$\=($q=$"x$_)."\\
$\$q/
"while$_--}{

在线尝试！

— Xcali
source

3

T-SQL代码，80字节

DECLARE @ INT=3

,@z INT=0
x:PRINT
space(@-abs(@-@z-.5))+char(92-@z/@*45)SET
@z+=1IF @z<@*2GOTO x

在线尝试

T-SQL查询，96字节

为了使这项工作能够在线进行，我不得不进行一些小的改动。在线摘要中不会显示行开头的空格。所以我改用ascii 160。在Management Studio中运行时，可以更改设置以将结果显示为文本，这将在此发布的脚本中产生正确的空格。

DECLARE @ INT=3
SELECT space(@-abs(@-number-.5))+char(92-number/@*45)FROM
spt_values WHERE number<@*2and'p'=type

在线尝试

— 克劳森
source

3

PowerShell，44 41字节

filter f{if($_){'\'
--$_|f|%{" $_"}
'/'}}

在线尝试！

— 疯狂的
source

2

木炭，5字节

↘Ｎ‖Ｍ↓

在线尝试！链接是详细版本的代码。说明：

↘Ｎ

输入数字并打印\该长度的s的对角线。

‖Ｍ↓

垂直反射线。

— 尼尔
source

2

APL（NARS），40个字符，80个字节

{f←{⍺,⍨⍵⍴' '}⋄⊃('\'f¨k),('/'f¨⌽k←¯1+⍳⍵)}

测试：

  h←{f←{⍺,⍨⍵⍴' '}⋄⊃('\'f¨k),('/'f¨⌽k←¯1+⍳⍵)}
  h 2
\ 
 \
 /
/ 
  h 5
\    
 \   
  \  
   \ 
    \
    /
   / 
  /  
 /   
/

— 罗斯鲁普
source

1

视网膜0.8.2，32字节

.+
$* ¶$&$* 
\G.
¶$`\
r`.\G
$'/¶

在线尝试！说明：

.+
$* ¶$&$*

生成两行n空格。

\G.
¶$`\

将顶线变成\对角线。

r`.\G
$'/¶

将底线变成/对角线。

— 尼尔
source

1

C（gcc），67 65字节

-2个字节归功于ceilingcat

f(n,i){for(i=~n;i++<n;)i&&printf("%*c\n",n-abs(i)+1,"/\\"[i<0]);}

在线尝试！

— 腹肌
source

1

Python 2中，85 84 81 80 75个字节

def a(n):l="for i in range(n):print' '*";exec l+"i+'\\\\'\n"+l+"(n+~i)+'/'"

在线尝试！

— 鲁霍拉
source

1

PowerShell，50个字节

param($n)0..--$n|%{' '*$_+'\'}
$n..0|%{' '*$_+'/'}

在线尝试！

将研究它，使其仅通过该范围一次。对于无脑方法来说还不错。

— 维斯卡
source

1

小枝，115字节

向后构建字符串，最后将其“返回”。

使用宏生成所有结果。

{%macro a(N,s="")%}{%for i in N..1%}{%set s=('%'~i~'s
'~s~'%'~i~'s
')|format('\\','/')%}{%endfor%}{{s}}{%endmacro%}

此宏必须在文件中，并按以下方式导入：

{% import 'macro.twig' as a %}

{{ a.a(<value>) }}

您可以在https://twigfiddle.com/5hzlpz上尝试（单击“显示原始结果”）。

— 伊斯梅尔·米格尔（Ismael Miguel）
source

1

Haskell，52 49字节

-3字节，感谢Sriotchilism O'Zaic。

unlines.g
g 0=[]
g n="\\":map(' ':)(g$n-1)++["/"]

在线尝试！

— 约瑟夫·西布尔-恢复莫妮卡
source

1

您可以使用g$n-1代替来保存一个字节g(n-1)。您也不需要计数，f=因为f从不引用。

— Ad Hoc Garf Hunter，

1

MATL，14 13 12字节

Xy92*t45-Pvc

@LuisMendo节省了1个字节

说明

        % Implicitly grab the input as an integer
Xy      % Create an identity matrix this size
92*     % Multiply by 92 (ASCII for '\')
t       % Duplicate the matrix
45-     % Subtract 45 from every element yielding 47 (ASCII for '/') on the diagonal
        % and -45 everywhere else
P       % Vertically flip this matrix
v       % Vertically concatenate the two matrices
c       % Convert to characters (negative numbers are replaced with a space)
        % Implicitly display the result

在MATL Online上试用

— Suever
source

@LuisMendo更新！谢谢！

— Suever

1

Python 3中，90 83个字节

lambda n:'\n'.join([' '*i+'\\'for i in range(n)]+[' '*(n+~i)+'/'for i in range(n)])

在线尝试！

-7个字节，感谢@squid

— Artemis仍然不信任SE
source

83个字节，但我觉得它仍然可以下降

— 恢复莫妮卡

1

我希望这是可能的。

— Artemis仍然不相信

很快 ...

— 恢复莫妮卡

哦，是的，我忘记了这一点。也许您应该提交！

— Artemis仍然不相信

1

Rockstar，133个字节

在这里在线尝试！

F takes N,S
If N is 0
Give back N

Say S+"\"
Let T be S+" "
Let M be N-1
F taking M,T
Say S+"/"

Listen to X
F taking X,""

由于Rockstar在字符串操作方面并不出名，因此需要花费大量的代码（递归时间甚至更长）。

箭头的大小用作输入。

— 加博施
source

1

PHP，79 63 61个字节

function f($x,$s=''){if($x)echo"$s\\
",f($x-1,"$s "),"$s/
";}

在线尝试！

在PHP中递归。

-12个字节由@manatwork

— 640KB
source

1

最好倒数。在线尝试！。

— manatwork

@manatwork非常非常好！

— 640KB

1

\ / \ />，74个字节

jp100o
-84*}!o:?!x1
@+:q:p=?x:o~$:0(pa"\/"q?$~}}:
x2-:p$1-y$:0(?
.{suh?!;2

说明：（基于起点旋转的线）

jp100o                        //setup
:?!x1-84*}!                   //add leading spaces, loop and decrement until 0
~$:0(pa"\/"q?$~}}:@+:q:p=?x:o //add correct slash, go back to loop or switch sides
$:0(?x2-:p$1-y                //flip direction state or continue to print
{suh?!;2.                     //remove extra data and print stack

— 龙卷风
source

1

\/\/> (pronounced wɜrm)谢谢，我讨厌。（jk，我很想尝试一下）

— Jo King

@JoKing哈哈哈，得把我的灵感戴在袖子上。（感谢！）

— torcado

1

Python 3，55个字节

f=lambda n,i="":n and i+"\\\n"+f(n-1,i+" ")+i+"/\n"or""

在线尝试！

— 马修·詹森（Matthew Jensen）
source

54个字节。

— Chas Brown

0

Python 2，63个字节

f=lambda n,s='':n and f(n-1,~-n*' '+'\\\n'+s+~-n*' '+'/\n')or s

在线尝试！

— 查斯·布朗
source

0

Stax，10 个字节

Ç₧¥╗M'gQ9⌂

运行并调试

— 递归的
source

0

SimpleTemplate，100字节

这是一个非常有趣的挑战，但是语言中的一些错误使优化变得困难。

{@set_ argv.0}{@while_}{@callstr_repeat intoS" ",_}{@setO S,"\\\n",O,S,"/\n"}{@incby-1_}{@/}{@echoO}

基本上，将这些值向后循环，从中间开始处理字符串。

答案应该如何

由于这些错误，该代码未正确解释。

如果编译器没有任何错误（86字节），则代码将是这样：

{@forfrom argv.0to0step-1}{@callrepeat intoS" ",_}{@setO S,"\\
",O,S,"/
"}{@/}{@echoO}

哦，好吧，至少该解决方案可行：x

— 伊斯梅尔·米格尔（Ismael Miguel）
source

0

JavaScript（Node.js），42字节（如果允许尾随换行符）

n=>(F=s=>n--?s+`\\
`+F(s+" ")+s+`/
`:"")``

在线尝试！

JavaScript（Node.js），48 46字节

n=>(F=s=>s+`\\
${--n?F(s+" ")+`
`:""}${s}/`)``

在线尝试！

— 浅香诗人
source

ASCII Meme箭头生成器

技术指标

例子

样例代码

规则

画布，2 个字节

C（gcc），56个字节

Python 2，54个字节

05AB1E，6个字节

C＃（Visual C＃交互式编译器），66字节

C64Mini / C64 BASIC（和其他CBM BASIC变体），使用了52个标记化的BASIC字节

MarioLANG，719个 677字节

brainfuck，125个字节

Ruby，111 99 77 73 68 64 57 56字节

替代（但更长）的解决方案

注入和取消移位，72字节

向下，注入和取消移位，80字节

有趣的两个非嵌套循环，127个字节

Perl 5，36 -p个字节

T-SQL代码，80字节

T-SQL查询，96字节

PowerShell，44 41字节

木炭，5字节

APL（NARS），40个字符，80个字节

视网膜0.8.2，32字节

C（gcc），67 65字节

Python 2中，85 84 81 80 75个字节

PowerShell，50个字节

小枝，115字节

Haskell，52 49字节

MATL，14 13 12字节

Python 3中，90 83个字节

Rockstar，133个字节

PHP，79 63 61个字节

-12个字节由@manatwork

\ / \ />，74个字节

Python 3，55个字节

Python 2，63个字节

Stax，10 个字节

SimpleTemplate，100字节

JavaScript（Node.js），42字节（如果允许尾随换行符）

JavaScript（Node.js），48 46字节

Perl 5，36 `-p`个字节