Подключите пиксели


40

Учитывая текст как это:

# #### ## #
## #  ##  #
   ####  ##

Выведите тот же текст, но соединив пиксели с символами ─│┌┐└┘├┤┬┴┼. Если у пикселя нет соседей, не меняйте его.

Итак, вывод последнего текста:

│ ─┬── ┌─ │
└─ │  ┌┘  │
   └──┘  ─┘
  • Вы можете принять входные данные как логический массив.
  • Вход всегда будет содержать не менее 1 пикселя.
  • Вы можете считать символы рисования коробки как 1 байт.
  • Вы можете предположить, что ввод дополнен пробелами.

Контрольные примеры

## #
=>
── #
###
 #
=>
─┬─
 │
##### ##
 # #  #
########
=>
─┬─┬─ ┌─
 │ │  │
─┴─┴──┴─
 # #
#####
 # #
=>
 │ │
─┼─┼─
 │ │
# # # # #
 # # # #
# # # # #
 # # # #
# # # # #
=>
# # # # #
 # # # #
# # # # #
 # # # #
# # # # #
#####
#####
#####
#####
#####
=>
┌┬┬┬┐
├┼┼┼┤
├┼┼┼┤
├┼┼┼┤
└┴┴┴┘

Поскольку это , выигрывает самый короткий код.


2
Должен ли я использовать хеш-символ в качестве пикселя? Могу ли я получить входные данные в виде логического массива?
Рохан Джунджхунвала

Могут ли быть пробелы или символы новой строки?
Санчиз

btw: -|r7LJE3TW+является подходящей заменой 1-байтовых символов для символов блока.
Тит

Ответы:


7

Желе , 60 52 51 50 49 48 байт

ṖḤ0;+Ḋ×
“µ³Q~E!G⁸ṗṫ\’ḃ61+9471Ọ⁾# j
ZÑ€4×Z++Ñ€ị¢Y

Сохраненный байт благодаря @ Деннис.

Входные данные являются логическим массивом из 1 и 0. Итерирует по каждому столбцу и каждой строке, преобразуя заголовок и хвост каждого инфикса размера 3 из пары двоичных цифр в десятичную, и умножает это на центр каждого инфикса. Затем он суммирует сам с собой, чтобы найти индекс в '#───│┌┐┬│└┘┴│├┤┼ '.

Попробуйте онлайн! ( случай 2 ) ( случай 3 ) ( случай 4 )

объяснение

Это основано на той же идее, что и мой ответ в J, но вместо обработки на каждом подмассиве 3x3 я обрабатываю каждую строку и каждый столбец, все еще получая одну и ту же таблицу индексов.

Более половины байтов тратится на создание списка символов блока '#───│┌┐┬│└┘┴│├┤┼ '. Строковые литералы начинаются с Jelly и имеют разные значения в зависимости от их терминатора. Здесь терминатор означает, что строка будет проанализирована как кодовые точки каждого символа в соответствии с кодовой страницей Jelly и преобразована из списка из 250 базовых цифр в десятичную.

“µ³Q~E!G⁸ṗṫ\’ => 10041542192416299030874093
(bijective base 61) => [1, 1, 1, 3, 13, 17, 45, 3, 21, 25, 53, 3, 29, 37, 61]
(add 9471 and convert to char) => '───│┌┐┬│└┘┴│├┤┼'

Затем преобразуйте это десятичное число в список цифр в биективном основании 61 и увеличьте каждое на 9471, чтобы переместить его в диапазон символов поля, и преобразуйте каждое с использованием символов Python chr. Затем добавьте к нему символьный литерал ”#и добавьте пробел .

ṖḤ0;+Ḋ×  Helper link - Input: 1d list A
Ṗ        Get all of A except the last value
 Ḥ       Double each value in it
  0;     Prepend a 0
    +    Add elementwise with
     Ḋ     All of A except the first value
      ×  Multiply elementwise by A

“µ³Q~E!G⁸ṗṫ\’ḃ61+9471Ọ⁾# j  Nilad. Represents '#───│┌┐┬│└┘┴│├┤┼ '
“µ³Q~E!G⁸ṗṫ\’               Get the code points of each char in the string and
                            convert from a list of base 250 digits to decimal
             ḃ61            Convert that to a list of digits in bijective base 61
                +9471       Add 9400 to each
                     Ọ      Convert from ordinals to chars, gets '───│┌┐┬│└┘┴│├┤┼'
                      ⁾#    A pair of chars ['#', ' ']
                         j  Join the pair using the box characters

ZÑ€4×Z++Ñ€ị¢Y  Input: 2d list M
Z              Transpose
 р            Apply the helper link to each row of the transpose (each column of M)
   4×          Multiply each by 4
     Z         Transpose
      +        Add elementwise with M
       +       Add elementwise with
        р       The helper link applied to each row of M
          ị¢   Use each result as an index to select into the nilad
            Y  Join using newlines
               Return and print implicitly

15

J , 82 72 66 байт

(ucp' #───│┌┐┬│└┘┴│├┤┼'){~]+]*3 3((2#.1 7 3 5{,);._3)0,.~0,.0,~0,]

Входные данные являются булевой таблицей 1 и 0. Правила гласят, что каждый символ коробки считается одним байтом, а не тремя, и это было применено здесь.

использование

   f =: (ucp' #───│┌┐┬│└┘┴│├┤┼'){~]+]*3 3((2#.1 7 3 5{,);._3)0,.~0,.0,~0,]
   m =: 1 0 1 1 1 1 0 1 1 0 1 , 1 1 0 1 0 0 1 1 0 0 1 ,: 0 0 0 1 1 1 1 0 0 1 1
   m { ' #'
# #### ## #
## #  ##  #
   ####  ##
   f m
│ ─┬── ┌─ │
└─ │  ┌┘  │
   └──┘  ─┘
   ' #' {~ m =: 5 5 $ 1
   f m
┌┬┬┬┐
├┼┼┼┤
├┼┼┼┤
├┼┼┼┤
└┴┴┴┘
   ' #' {~ m =: 5 9 $ 1 0
# # # # #
 # # # # 
# # # # #
 # # # # 
# # # # #
   f m
# # # # #
 # # # # 
# # # # #
 # # # # 
# # # # #

объяснение

Сначала ввод дополняется нулями со всех сторон.

   ] m =: 1 0 1 1 1 1 0 1 1 0 1 , 1 1 0 1 0 0 1 1 0 0 1 ,: 0 0 0 1 1 1 1 0 0 1 1
1 0 1 1 1 1 0 1 1 0 1
1 1 0 1 0 0 1 1 0 0 1
0 0 0 1 1 1 1 0 0 1 1
   (0,.~0,.0,~0,]) m
0 0 0 0 0 0 0 0 0 0 0 0 0
0 1 0 1 1 1 1 0 1 1 0 1 0
0 1 1 0 1 0 0 1 1 0 0 1 0
0 0 0 0 1 1 1 1 0 0 1 1 0
0 0 0 0 0 0 0 0 0 0 0 0 0

Затем выбирается каждый подмассив размером 3

   3 3 <;._3 (0,.~0,.0,~0,]) m
┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┐
│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│
│0 1 0│1 0 1│0 1 1│1 1 1│1 1 1│1 1 0│1 0 1│0 1 1│1 1 0│1 0 1│0 1 0│
│0 1 1│1 1 0│1 0 1│0 1 0│1 0 0│0 0 1│0 1 1│1 1 0│1 0 0│0 0 1│0 1 0│
├─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┤
│0 1 0│1 0 1│0 1 1│1 1 1│1 1 1│1 1 0│1 0 1│0 1 1│1 1 0│1 0 1│0 1 0│
│0 1 1│1 1 0│1 0 1│0 1 0│1 0 0│0 0 1│0 1 1│1 1 0│1 0 0│0 0 1│0 1 0│
│0 0 0│0 0 0│0 0 1│0 1 1│1 1 1│1 1 1│1 1 0│1 0 0│0 0 1│0 1 1│1 1 0│
├─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┼─────┤
│0 1 1│1 1 0│1 0 1│0 1 0│1 0 0│0 0 1│0 1 1│1 1 0│1 0 0│0 0 1│0 1 0│
│0 0 0│0 0 0│0 0 1│0 1 1│1 1 1│1 1 1│1 1 0│1 0 0│0 0 1│0 1 1│1 1 0│
│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│0 0 0│
└─────┴─────┴─────┴─────┴─────┴─────┴─────┴─────┴─────┴─────┴─────┘

Тогда только 5 значений в каждом подмассиве рассматриваются

┌───┐
│xAx│
│CED│
│xBx│
└───┘

Значения ABCDвыбираются путем выравнивания каждого подмассива и выбора индексов 1 7 3 5. Эти значения умножаются Eна индекс 4. Он затем преобразуется из списка двоичных цифр в десятичную и увеличивается на E. Эти xзначения не нужны.

   3 3 (4&{([+2#.*)1 7 3 5&{)@,;._3 (0,.~0,.0,~0,]) m
 5 0 2  8 4 3  0  6 3 0  5
10 3 0 13 0 0  6 11 0 0 13
 0 0 0 10 4 4 11  0 0 2 11

Это используется в качестве индекса для выбора персонажа для рисования в соответствии с таблицей ниже (немного переупорядочено для игры в гольф). Последний столбец сопоставляет выходное значение каждого подмассива с символом поля.

 0  (space)  0
 1  #        1
 2  ┌        6
 3  ┬        8
 4  ┐        7
 5  ├        14
 6  ┼        16
 7  ┤        15
 8  └        10
 9  ┴        12
10  ┘        11
11  │        5, 9, 13
12  ─        2, 3, 4

Кроме того, в J строка ' #───│┌┐┬│└┘┴│├┤┼'использует 8-битные символы, что делает ее длиной 47 (для каждого байта) для 17 необходимых символов. Команда ucpпреобразует его в 16-битные символы, что позволяет ему быть длиной 17.


13

JavaScript (ES6), 155 121 103 102 символа

let f =
    
s=>s.replace(/#/g,(c,p)=>'#│─┘─└─┴││┐┤┌├┬┼'[t=x=>s[p+x]==c,8*t(w=s.search`
`+1)+4*t(1)+2*t(-1)+t(-w)])

console.log(f(
  '# #### ## #\n' +
  '## #  ##  #\n' +
  '   ####  ##'
));

Редактировать: сохранено 18 байт с помощью ETHproductions
Редактировать: сохранено 1 байт с использованием 1-го параметра replace () как'#'

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

Мы перебираем все #символы, найденные во входной строке. Для каждого из них мы проверяем, являются ли его соседи #символами, используя t()функцию:

t = x => s[p + x] == c  // where c = '#'

Параметр xв t()функции смещение соседних по отношению к текущему положению p. Мы используем -1 / + 1 для проверки левых / правых соседей и -w / + w для верхних / нижних соседей (где wширина строки, то есть позиция первого разрыва строки + 1).

Каждому соседу присваивается свой вес (1, 2, 4 или 8) в соответствии со следующим компасом:

  1
2 + 4
  8

Каждая комбинация весов приводит к уникальному значению в [0 .. 15]. Например, если заданы как соседний элемент сверху, так и соседний справа, сумма будет равна 1 + 4 = 5, что переводится в следующую таблицу:

00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15
#  │  ─  ┘  ─  └  ─  ┴  │  │  ┐  ┤  ┌  ├  ┬  ┼

Следовательно, '#│─┘─└─┴││┐┤┌├┬┼'[weight_sum]приводит к ожидаемому характеру.


Ха, у нас была в основном
одна и

@ETHproductions - В значительной степени так. ^^
Арно

Действительно, действительно хорошая техника там. Вы сильно превзошли меня в игре :)
ETHproductions

Вы можете сохранить 2 байта примерно так:s=>(w=s[0].length+1,s=s.join`\n`).replace(/#/g,(_,p)=>'#│─┘─└─┴││┐┤┌├┬┼'[t=x=>s[p+x]>' ',t(-w)+2*t(-1)+4*t(1)+8*t(w)])
ETHproductions

И на самом деле гораздо короче переключиться обратно на многострочную строку:s=>s.replace(/#/g,(_,p)=>'#│─┘─└─┴││┐┤┌├┬┼'[t=x=>s[p+x]>' ',t(-w)+2*t(-1)+4*t(1)+8*t(w)],w=s.indexOf`\n`+1)
ETHproductions

8

Python 2,7, 318 315 байт ( 270 267 символов)

Я уверен, что это может быть продолжено (особенно я хотел бы избавиться от этого раздражающего комментария первой линии), но вот моя запись:

#encoding:utf-8
f=lambda t:(lambda l,s:'\n'.join(''.join((u'┼├┤│┬┌┐│┴└┘│───#'[(s==l[i][j-1])+2*(s==l[i][j+1])+4*(i<1 or s==l[i-1][j])+8*(i>len(l)-2 or s==l[i+1][j])],s)[s==l[i][j]]for j in range(len(l[i])-1))for i in range(len(l))))([l+' 'for l in t.split('\n')],' ')

Вот объяснение того, как все это работает:

#encoding:utf-8 # Dammit, Python. This adds an extra 16 bytes!
f=lambda t:( # main lambda function
    lambda l,s: # inner lambda so we can pass it "local constants" (see last line)
        '\n'.join( # join each line
            ''.join( # join each char within the line
                (u'┼├┤│┬┌┐│┴└┘│───#'[ # string of all possible characters, indexed by binary 0-15 based on adjacent chars
                    (s==l[i][j-1])+ # left
                    2*(s==l[i][j+1])+ # right
                    4*(i<1 or s==l[i-1][j])+ # up ('i<1' just yields zero in case this is the first line, so that we don't get index problems)
                    8*(i>len(l)-2 or s==l[i+1][j])], # down ('i>len(l)-2' is same as above)
                s)[s==l[i][j]] # if original is space, choose space, else choose the previously chosen box-drawing char
                for j in range(len(l[i])-1)) # do this process for each char (excluding last, which is a space)
            for i in range(len(l))) # do this for each line
    )([l+' ' for l in t.split('\n')],' ') # call the inner lambda with two parameters: first, the text split into lines; second, a space char (actually makes code shorter)

РЕДАКТИРОВАТЬ: Удалены некоторые пробелы до for ... in ...


9
Использование Python 3 вместо этого должно решить вашу проблему с кодировкой Unicode, я думаю ...
Byte Commander

6

JavaScript (ES6), 150 139 133 131 символ

a=>a.map((q,y)=>q.replace(/#/g,(c,x)=>"#│─┘─└─┴││┐┤┌├┬┼"[g=(X,Y=0)=>(a[Y+y]||[])[X+x]==c,g(0,1)*8+g(1)*4+g(-1)*2+g(0,-1)])).join`
`

Принимает ввод как массив строк, например f(["###", " # "]).

Тестовый фрагмент


5

ALPACA , 414 + 2 = 416 байт

neighbourhoodV(^ v < >);states" ";statep"#"toA when4inV p,toB when3inV p andvs,toC when3inV p and^s,toD when3inV p and>s,toE when3inV p and<s,toF when2inV p and>s andvs,toG when2inV p andvs and<s,toH when2inV p and<s and^s,toI when2inV p and^s and>s,toJ when^p orvp,toK when<p or>p;stateA"┼";stateB"┴";stateC"┬";stateD"┤";stateE"├";stateF"┘";stateG"└";stateH"┌";stateI"┐";stateJ"│";stateK"─".

Требуются -fIфлаги.

Это решение использует очень большое количество байтов, но оно уникально тем, что использует клеточный автомат. ALPACA обычно используется как метаязык, но здесь я использую его как язык программирования.

Безголовая версия:

neighbourhood V (^ v < >);
state s " ";
state p "#" to A when 4 in V p,
to B when 3 in V p and v s,
to C when 3 in V p and ^ s,
to D when 3 in V p and > s,
to E when 3 in V p and < s,
to F when 2 in V p and > s and v s,
to G when 2 in V p and v s and < s,
to H when 2 in V p and < s and ^ s,
to I when 2 in V p and ^ s and > s,
to J when ^ p or v p,
to K when < p or > p;
state A "┼";
state B "┴";
state C "┬";
state D "┤";
state E "├";
state F "┘";
state G "└";
state H "┌";
state I "┐";
state J "│";
state K "─".

4

PHP, 203 байта

Вероятно, это можно сделать более коротким способом.

while($s=fgets(STDIN))$f[]=$s;foreach($f as$y=>&$s)for($x=strlen($s);$x--;)if($s[$x]>$b=" ")$s[$x]="#───│┘└┴│┐┌┬│┤├┼"[($s[$x-1]>$b)+2*($s[$x+1]>$b)+4*($f[$y-1][$x]>$b)+8*($f[$y+1][$x]>$b)];echo join($f);

читает ввод из STDIN. беги с -r.


4

Python 3, 149 байт

def f(s):S=' ';w=s.find('\n')+1;t=lambda i:(s+w*S)[i]>S;return[[c,'#│─┘─└─┴││┐┤┌├┬┼'[t(p-w)+2*t(p-1)+4*t(p+1)+8*t(p+w)]][c>S]for p,c in enumerate(s)]

Принимает ввод как ##\n #\nи возвращает вывод как ['─', '┐', '\n', ' ', '│', '\n'].


3

R, 199 212 байтов

РЕДАКТИРОВАТЬ: теперь это функция, а не фрагмент кода.

Ввод представляет собой матрицу m1 и 0. Это довольно уродливо и хакерски.

function(m){
v=strsplit(" #─│┘│┐│┤──└┴┌┬├┼","")[[1]]
d=dim(m)+1
n=array(0,dim=d+1)
n[2:d[1],2:d[2]]=m
for(i in 0:(d[1]-2)){for(j in 0:(d[2]-2))cat(v[1+(p<-n[2+i,2+j])*sum(2^(0:3)*n[1:3+i,1:3+j][1:4*2])+p]);cat("\n")}
}

Пара тестов:

> m = matrix(c(1, 1, 1, 0, 1, 0), nrow=2, byrow=TRUE)
> v=strsplit(" #─│┘│┐│┤──└┴┌┬├┼","")[[1]]
> d=dim(m)+1
> n=array(0,dim=d+1)
> n[2:d[1],2:d[2]]=m
> for(i in 0:(d[1]-2)){for(j in 0:(d[2]-2))cat(v[1+(p<-n[2+i,2+j])*sum(2^(0:3)*n[1:3+i,1:3+j][1:4*2])+p]);cat("\n")}
─┬─
 │ 
> m = matrix(rep(1, 16), ncol=4)
> v=strsplit(" #─│┘│┐│┤──└┴┌┬├┼","")[[1]]
> d=dim(m)+1
> n=array(0,dim=d+1)
> n[2:d[1],2:d[2]]=m
> for(i in 0:(d[1]-2)){for(j in 0:(d[2]-2))cat(v[1+(p<-n[2+i,2+j])*sum(2^(0:3)*n[1:3+i,1:3+j][1:4*2])+p]);cat("\n")}
┌┬┬┐
├┼┼┤
├┼┼┤
└┴┴┘

Представление должно быть либо полной программой, либо функцией. Чтение из существующей переменной не является допустимой формой ввода.
TuxCrafting

Как заставить некоторые символы юникода хорошо работать с R? x = "\ U253C" работает, но x = "┼" - нет.
Vlo

@ TùxCräftîñg: Исправлено сейчас!
rturnbull

@Vlo utf-8 - моя родная кодировка ОС. x = "┼"у меня просто отлично работает
rturnbull

3

Perl, 89 88 байт

Включает в себя +2 за -0p. Специальные символы учитываются как 1 байт, но для того, чтобы они действительно отображались как отдельные символы, лучше также добавить опцию -C.

Введите входные данные в STDIN с отступом между строками, чтобы они все имели одинаковую длину:

perl -C connect.pl
# #### ## #
## #  ##  #
   ####  ##
^D

connect.pl:

#!/usr/bin/perl -0p
/
/;$n=".{@-}";s%#%substr"#───│└┘┴│┌┐┬│├┤┼",/\G##/+2*/#\G/+4*/#$n\G/s+8*/\G#$n#/s,1%eg

1

MATL, 102 символа

Я присваиваю соседу значение (1, 2, 4 или 8); их сумма будет соответствовать символу в строке, содержащей символы рисования. Я думаю, что есть еще много возможностей для улучшений, но для черновика:

' #│││─┌└├─┐┘┤─┬┴┼' % String to be indexed
wt0J1+t4$(          % Get input, and append zeros at end of matrix (solely to avoid
                    %  indexing a non-existent second row/column for small inputs)
ttttt               % Get a whole load of duplicates to work on
3LXHY)              % Select rows 2:end from original matrix (one of the many dupes)
      w4LXIY)       % Select rows 1:end-1 from the 'destination' summing matrix)
             +HY(   % Add the neighbors below, store in 'destination' matrix
tIY)b3LY)2*+IY(     % +2* the neighbors above    +-------------------------------+
tHZ)b4LZ)4*+HZ(     % +4* the neighbors right    |(note: H and I contain 1:end-1 |
tIZ)b3LZ)8*+IZ(     % +8* the neighbors left     |  and 2:end respectively)      |
HH3$)               % Select the original matrix +-------------------------------+
*                % Make sure only cells that originally had a # get replaced
  1+)            % Add one because the original string is one-indexed. Index using ).

Улучшения должны быть сделаны:

  • Возможно заменить всю суммирующую часть каким-то циклом, работающим с повернутыми копиями матрицы
  • Отбросьте всю вещь и сделайте что-нибудь на основе одного цикла, работающего через матрицу
  • Используйте модульную индексацию для работы с плоским вектором из исходного массива (?)

Попробуйте онлайн! (может не иметь поддержки рисования символов в рамке)

Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.