Предположим, бесконечный лист шестиугольников состоит из |/\символов.

 / \ / \ / \ / \
|   |   |   |   |
 \ / \ / \ / \ /  etc.
  |   |   |   |
   \ / \ / \ /

При заданном вводе n > 0выведите треугольную часть этой плитки, как показано в приведенных ниже примерах, с якорем _в середине шестиугольника:

n=1
\_/

n=2
\/ \/
 \_/

n=3
\  |  /
 \/ \/
  \_/

n=4
\/ \ / \/
 \  |  /
  \/ \/
   \_/

n=5
\  |   |  /
 \/ \ / \/
  \  |  /
   \/ \/
    \_/

n=6
\/ \ / \ / \/
 \  |   |  /
  \/ \ / \/
   \  |  /
    \/ \/
     \_/

n=7
\  |   |   |  /
 \/ \ / \ / \/
  \  |   |  /
   \/ \ / \/
    \  |  /
     \/ \/
      \_/

n=8
\/ \ / \ / \ / \/
 \  |   |   |  /
  \/ \ / \ / \/
   \  |   |  /
    \/ \ / \/
     \  |  /
      \/ \/
       \_/

and so on

правила

Лидирующие / завершающие символы новой строки или другие пробелы являются необязательными, при условии, что символы выстраиваются соответствующим образом.
Допустимы либо полная программа, либо функция. Если функция, вы можете вернуть вывод, а не распечатать его.
Вывод может быть в консоль, сохранен как изображение, возвращен в виде списка строк и т. Д.
Стандартные лазейки запрещены.
Это код-гольф, поэтому применяются все обычные правила игры в гольф, и выигрывает самый короткий код (в байтах).

code-golf ascii-art

— AdmBorkBork
источник

Если вы посчитаете количество конечных точек в верхней части результата, вы получите A029578 (натуральные числа, чередующиеся с четными числами) со смещением 4. 2 , 4 , 3 , 6 , 4 , 8 , 5 , 10 , 6 , 12 , 7 , 14 , ...

— Тост инженера

Что означает «сохранено как изображение»? это помечено ascii-art?

— TSH

@tsh Для таких вещей, как HyperCard или что-то подобное, где вывод на холст является их эквивалентом вывода "stdout". Я не придирчив к тому, как отображается вывод.

— AdmBorkBork

8

Python 2 , 86 байт

i=k=input()
while i:i-=1;print(" "*(k+~i)+"\\"+i*' /  |\  '[i%2::2])[:k-~i]+"_/"[i>0:]

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

Один из приемов Эрика позволил мне сыграть в гольф 3 байта! Сохранено 3 байта благодаря Джонатану Аллану.

Как это работает

Во-первых, он получает входные данные из STDIN и назначает их двум отдельным переменным iи k. Затем, пока переменная iистинна, мы уменьшаем ее и генерируем строки соответственно; это сокращение для цикла от входа - 1 до 0.

Генерация строк

Я разделю это на несколько частей:

Прежде всего, получить ведущий интервал достигается с " "*(k+~i). Так iкак отображается через диапазон (input, 0] , мы должны вычесть его из k(нашего надежно сохраненного исходного ввода), уменьшить и повторить пробел много раз.
+"\\"- Добавляет символ "\"к пробелам выше.
' / |\ '[i%2::2]- Создает две наши строки, а именно, "/ \ "и " | ", следующим образом:
- Если iнечетно, i% 2 равно 1 , таким образом, [i%2::2]возвращает каждые 2 символа нашей большей строки, начиная с индекса 1 (с индексом 0).
- Если iчетное число, i% 2 равно 1 , таким образом, механизм выше делает то же самое, за исключением того, что он начинается с индекса 0 .
+~-i*- Повтор генерируется выше строка, либо "/ \ "или " | ", I-1 раз, и присоединяет его к другим строкам. Преимущество побитового оператора ( ~- Bitwise Complement, эквивалентного i, вычтенного из -1 ) состоит в том, что в этом контексте он не требует скобок.
[:k-~i]- Получает все символы строк, объединенных выше, пока индекс k- ~ i = k - (-1 - i) = k + 1 + i .
+"_/"[i>0:]- Это только добавляет, "/"если я ≥ 1 , иначе это добавляет _/.

Полный пример / подробности исполнения

Давайте возьмем пример того, как все работает для ввода 4 :

i=k=input()        # i and k are assigned to 4.
while i:           # Starts the loop. The initial value of i is 4.
i-=1;              # Decrement i. i is now 3.
" "*(k+~i)         # A space repeated k - 1 - i = 4 - 1 - 3 = 0 times.
+"\\"              # Plus the character "\". CS (Current string): "\".
' /  |\  '[i%2::2] # The string ' /  |\  '[3%2::2] = ' /  |\  '[1::2] = "/ \ ".
i*                 # ^ repeated i = 3 times: "/ \ / \ / \ ".
+                  # And concatenate. CS: "\/ \ / \ / \ "
[:k-~i]            # Get the characters of ^ up to index k + 1 + i = 4 + 1 + 3 = 8.
                   # CS: "\/ \ / \".
+"_/"[i>0:]        # Append "_/"[i>0:] = "_/"[3>0:] = "_/"[1:] = "/".
                   # CS: "\/ \ / \/".
print              # Output the result "\/ \ / \/".
while i:           # i is truthy (> 0), thus we loop again.
i-=1;              # Decrement i. i becomes 2.
" "*(k+~i)         # " " repeated 4 - 2 - 1 = 1 time. 
+"\\"              # Plus "\". CS: " \".
' /  |\  '[i%2::2] # ' /  |\  '[2%2::2] = ' /  |\  '[::2] = "  | ".
+i*                # Repeat i = 2 times and append: "  | ". CS: " \  |  |".
[:k-~i]            # CS up until k + 1 + i = 4 + 2 + 1 = 7. CS: " \  |  ".
+"_/"[i>0:]        # Append "/". CS: " \  |  /".
print              # Outputs the CS: " \  |  /".
while i:           # i is truthy (> 0), thus we loop again.
i-=1;              # Decrement i. i is now 1.
" "*(k+~i)         # " " repeated 4 - 1 - 1 = 2 times. 
+"\\"              # Plus "\". CS: "  \".
' /  |\  '[i%2::2] # ' /  |\  '[2%2::2] = ' /  |\  '[::2] = "/ \ ".
+i*                # Repeat i = 1 time and append: "/ \ ". CS: "  \/ \ ".
[:k-~i]            # CS up until k + i + 1 = 4 + 2 = 6. CS: "  \/ \".
+"_/"[i>0:]        # Append "/". CS: "  \/ \/".
print              # Outputs the CS: "  \/ \/".
while i:           # i is truthy (> 0), thus we loop again.
i-=1;              # Decrement i. i is now 0.
" "*(k+~i)         # " " repeated 4 - 1 - 0 = 3 times. 
+"\\"              # Plus "\". CS: "   \".
' /  |\  '[i%2::2] # ' /  |\  '[1%2::2] = ' /  |\  '[1::2] = "  | ".
+i*                # Repeat i = 0 times and append: "   \". CS: "   \".
[:k-~i]            # CS up until k + i + 1 = 4 + 0 + 1 = 5. CS: "   \".
+"_/"[i>0:]        # Append "_/" (because i > 0 is False since i == 0). CS: "  \_/".
print              # Outputs the CS: "  \_/".
while i:           # i == 0, hence the condition is falsy and the loop ends. 
                   # Program terminates.

— Мистер Xcoder
источник

Переместите курсор i-=1к началу цикла и используйте немного другую правую форму, чтобы уменьшить его до 87 байт .

— Джонатан Аллан

... на самом деле даже лучше при 86 байтах, используя что-то вроде вашей правой стороны :)

— Джонатан Аллан

@JonathanAllan ... Спасибо! (Хотя переделывать объяснение будет ... тяжело! ... вздох )

— Мистер Xcoder

@JonathanAllan Я нашел альтернативу , которая не меняет порядок оператора декремента.

— мистер Xcoder

4

Python 2 , 90 байт

n=N=input()
while N:print' '*(n-N)+'\\'+(('/   \|  '[N%2::2]*n)[:N*2-1],'_')[N<2]+'/';N-=1

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

— Эрик Outgolfer
источник

2

05AB1E , 33 байта

1ŸεÐi'_ë"/ \   | "4ôsès∍}'\ì.∞}.c

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

— Эрик Outgolfer
источник

Попробуйте онлайн! - Пробовал использовать паттерны «0300» и «2010», не так жарко.

— Волшебная Урна Осьминога

@MagicOctopusUrn Это тоже не печатает подчеркивание: p

— Эрик Outgolfer

2

Mathematica, 131 байт

Join[Table[s=StringRiffle@Table[If[OddQ@i,"/ \\"," | "],⌈i/2⌉];""<>{"\\",If[!OddQ@i,{" ",s," "},s],"/"},{i,#-1,1,-1}],{"\_/"}]&

возвращает список строк

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

— J42161217
источник

2

Сетчатка , 129 119 112 байт

\d+
$* 
 
¶$`a $'$' 
m`$
/
  /$
_/
^.¶

a(    )*/
a$#1/
\d+
$*
1
/ a  
 (    )*/
$#1/
\d+
$*
1
 |  
a /¶
a/¶
a
\

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

— овс
источник

2

Древесный уголь , 26 байт

ＮθＧ↖→↓θ“ ″✂=ＡＬ«Q"η\`”←_↖θ‖Ｂ

Попробуйте онлайн! Ссылка на подробную версию кода.

— Нил
источник

2

Python 2 , 123 112 110 109 100 98 96 байт

i=n=input()
while i:a=i%2;print' '*(n-i)+'\%s/'%['_',((-~i/2)*'/   \  |'[a::2])[a:~a]][i>1];i-=1

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

Сохранено несколько байтов с использованием ввода и форматирования строки, как в ответе Рода
Сохранено 2 байта благодаря Mr. Xcoder

— TFeld
источник

1

Вы можете сохранить 2 байта, заменив -1-aс ~a(как я сделал в моем ответе).

— мистер Xcoder

@ Mr.Xcoder Спасибо :)

— TFeld

1

Python 2 , 103 байта

i=n=input()
while i:print' '*(n-i)+'\%s/'%' '.join(['/\\'*(-~i/2),['_',' '+'| '*(i/2)][i>1]][i%2]);i-=1

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

— прут
источник

1

APL (Dyalog) , 97 93 байта

{⍵=1:1 3⍴'\_/'⋄x←' ',' ',⍨∇⍵-1⋄y←1+2×⍵-1⋄2|⍵:x⍪⍨'\','/',⍨y⍴'  | '⋄x⍪⍨'\/','\/',⍨(y-2)⍴' \ /'}

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

— Уриэль
источник

1

SOGL V0.12 , 28 27 байтов

╔.H∫"C↕‽«‘4nwιF«Im}¹⌡¾\/¹№╚

Попробуй здесь!

— dzaima
источник

1

Haskell , 96 95 байт

f n=[([1..n-x]>>" ")++'\\':take(2*x+1)(cycle$("_":a)!!x)++"/"|x<-[n,n-1..0]]
a="/ \\ ":"  | ":a

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

0 индексируется и возвращает список строк.

— Laikoni
источник

0

Haskell, 101 99 байт

j 1=["\\_/"]
j n|r<-([1,3..n-1]>>)=('\\':cycle[init$r"/ \\ ",' ':r" |  "]!!n++"/"):map(' ':)(j$n-1)

Возвращает список строк.

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

Как это устроено:

j 1=["\\_/"]               -- base case, n=1

j n                        -- for all other n
   |r<-([1,3..n-1]>>)      -- let r be the function that makes n/2 copies of
                           -- it's argument
   =                       -- the result is
      '\\':                --  a backslash, followed by
      cycle[  ]!!n         --  the inner part, which is
          init$r"/ \\ "    --    all but the last char of some copies of
                           --    "/ \ " for even line numbers, or
          ' ':r" |  "      --    some copies of " |  " prepended by a space
                           --    for odd line numbers
                           --    (chosen by indexing an infinite list of
                           --     both values alternating)   
      ++"/"                --  followed by a slash
    :                      --  and append a
               j$n-1        --  recursive call with n-1
      map(' ':)            --  where each line is prepended by a space

Редактировать: @Laikoni сохранил два байта. Благодарность!

— Ними
источник

([1,3..n-1]>>)можно использовать вместо ([1..div n 2]>>).

— Лайкони

0

Java (OpenJDK 8) , 315 306 байт

i->{String r="";int j=0,k,u=i*2;char[][]c=new char[i][u+1];c[i-1][i]=95;for(;j<i;r+="".valueOf(c[j++]).replace('\0',' ')+"\n")for(k=0;k<u+1;k++){if(k==j)c[j][k]=92;if(k==u-j)c[j][k]=47;if(k>j&k<u-j)if((i-j)%2<1)c[j][k]=(k-j-1)%2<1?(char)(47+((k-j-1)/2)%2*45):32;else if((k-j-1)%4==2)c[j][k]='|';}return r;}

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

— Роберто Грэм
источник

0

Java (OpenJDK 8) , 198 байт

Наконец получил его ниже 200 байт. Возможно выложу объяснение позже.

i->{for(int k=i+1;i>0;System.out.println(("".format("%"+(k-i)+"s","")+"\\"+(i<2?"":"".format("%"+(i-1)+"s","")).replace(" ","/ \\ ,  | ".split(",")[i%2])).substring(0,i<2?k:k+i)+(--i<1?"_/":"/")));}

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

— Люк Стивенс
источник

0

JavaScript (ES6), 89 85 байт

f=(y,s='\\')=>--y?s+(y&1?' / \\':' |  ').repeat(y).slice(~y-y)+`/
`+f(y,' '+s):s+'_/'

демонстрация

Показать фрагмент кода

f=(y,s='\\')=>--y?s+(y&1?' / \\':' |  ').repeat(y).slice(~y-y)+`/
`+f(y,' '+s):s+'_/'

console.log(f(1))
console.log(f(2))
console.log(f(3))
console.log(f(4))
console.log(f(5))
console.log(f(6))
console.log(f(7))

Развернуть фрагмент

— Arnauld
источник

0

CJam, 43

ri_{S*'\@(:X"  | / \ "4/=X*X2*)<'_e|'/NX}/;

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

— aditsu
источник

0

PHP, 89 + 1 байт

while($k=$argn-$n)echo($p=str_pad)("",$n++),$p("\\",2*$k,$k>1?$k&1?"  | ":"/ \ ":_),"/
";

Запустите как трубу с -nRили попробуйте онлайн .

— Titus
источник

0

Pyth , 46 44 байта

j_m+<++*;t-Qd\\*d%2>" /  |\  "%d2h+Qd>"_/"._

Попробуй это здесь!

— Мистер Xcoder
источник

Треугольники шестиугольников

правила

Python 2 , 86 байт

Как это работает

Генерация строк

Полный пример / подробности исполнения

Python 2 , 90 байт

05AB1E , 33 байта

Mathematica, 131 байт

Сетчатка , 129 119 112 байт

Древесный уголь , 26 байт

Python 2 , 123 112 110 109 100 98 96 байт

Python 2 , 103 байта

APL (Dyalog) , 97 93 байта

SOGL V0.12 , 28 27 байтов

Haskell , 96 95 байт

Haskell, 101 99 байт

Java (OpenJDK 8) , 315 306 байт

Java (OpenJDK 8) , 198 байт

JavaScript (ES6), 89 85 байт

демонстрация

CJam, 43

PHP, 89 + 1 байт

Pyth , 46 44 байта