Розпізнавання обличчя


43

Мета цього завдання - виявити, очистити та відзначити всі обличчя в будь-якому даному "зображенні".

Що в обличчі?

Обличчям буде квадрат ZxZ, де Z - непарне ціле число, що перевищує 1. У верхньому лівому та правому кутах та в центрі будуть символи 'O', а нижня лінія буде достатньо оточуючих '\' та '/' символи '_', щоб заповнити решту рядка. Приклади:

обличчя 3х3:

O O
 O
\_/

обличчя 5x5:

O   O

  O

\___/

обличчя 7x7:

O     O


   O


\_____/

тощо.

Вхідні дані

Введення буде на STDIN і буде складатися з ряду рядків рівних за довжиною символів.

Вихідні дані

Вихідні дані повинні бути вхідними та очищеними всіма особами (тобто всі символи, за винятком очей, носа та рота, повинні бути видалені з-за меж обличчя) та поставлені у вікні (оточені символами +, - та | |). Там, де дві або більше граней перекриваються, обидві повинні бути очищені та позначені коробочкою, але пріоритет повинен бути наданий більшій грані (вона повинна бути розміщена зверху); якщо обидві грані однакового розміру, пріоритет залишається на розсуд виконавця. Якщо на вході немає граней, вихід повинен бути таким же, як і вхід.

Деякі приклади

Вхід:

*******
*******
**O*O**
***O***
**\_/**
*******
*******

Вихід:

*******
*+---+*
*|O O|*
*| O |*
*|\_/|*
*+---+*
*******

Введення (неповне обличчя):

*******
*******
**O*O**
*******
**\_/**
*******
*******

Вихід:

*******
*******
**O*O**
*******
**\_/**
*******
*******

Введення (вкладені обличчя):

*******
*O***O*
**O*O**
***O***
**\_/**
*\___/*
*******

Вихід:

+-----+
|O   O|
|     |
|  O  |
|     |
|\___/|
+-----+

Введення (кілька граней):

~{$FJ*TBNFU*YBVEXGY%
FOCO$&N|>ZX}X_PZ<>}+
X$OOPN ^%£)LBU{JJKY%
@\_/$£!SXJ*)KM>>?VKH
SDY%£ILO(+{O:HO(UR$W
XVBFTER^&INLNLO*(&P:
>?LKPO)UJO$£^&L:}~{&
~@?}{)JKOINLM@~}P>OU
:@<L::@\___/GER%^*BI
@{PO{_):<>KNUYT*&G&^

Вихід:

+---+*TBNFU*YBVEXGY%
|O O|&N|>ZX}X_PZ<>}+
| O |N ^%£)LBU{JJKY%
|\_/|£+-----+M>>?VKH
+---+I|O   O|HO(UR$W
XVBFTE|     |LO*(&P:
>?LKPO|  O  |&L:}~{&
~@?}{)|     |@~}P>OU
:@<L::|\___/|ER%^*BI
@{PO{_+-----+YT*&G&^

Введення (біля межі):

~{$FJ*TBNFU*YBVEXGY%
OCO$&N|>ZX}X_PZ<>}+^
$OOPN ^%£)LBU{JJKY%{
\_/$£!SXJ*)KM>>?VKHU
SDY%£ILO(+{8:HO(UR$W
XVBFTER^&INLNLO*(&P:
>?LKPO)UJ^$£^&L:}~{&
~@?}{)JKOINLM@~}P>OU
:@<L::@BJYT*GER%^*BI
@{PO{_):<>KNUYT*&G&^

Вихід:

---+J*TBNFU*YBVEXGY%
O O|&N|>ZX}X_PZ<>}+^
 O |N ^%£)LBU{JJKY%{
\_/|£!SXJ*)KM>>?VKHU
---+£ILO(+{8:HO(UR$W
XVBFTER^&INLNLO*(&P:
>?LKPO)UJ^$£^&L:}~{&
~@?}{)JKOINLM@~}P>OU
:@<L::@BJYT*GER%^*BI
@{PO{_):<>KNUYT*&G&^

Введення (перекриття граней):

~{$FJ*TBNFU*YBVEXGY%
FXC£$&N|>ZX}X_PZ<>}+
X$*OPN O%£)LBO{JJKY%
@:U%$£!SXJ*)KM>>?VKH
SDY%£OLO(+{P:HO(UR$W
XVBFTER^&IOLNLO*(&P:
>?L\___/JR$£^&L:}~{&
~@?}{)JKOINLM@~}P>OU
:@<L::@\_____/R%^*BI
@{PO{_):<>KNUYT*&G&^

Вихід:

~{$FJ*TBNFU*YBVEXGY%
FX+---+-------+Z<>}+
X$|O  |O     O|JJKY%
@:|   |       |>?VKH
SD|  O|       |(UR$W
XV|   |   O   |*(&P:
>?|\__|       |:}~{&
~@+---|       |}P>OU
:@<L::|\_____/|%^*BI
@{PO{_+-------+*&G&^

Що з поєднаними обличчями (наприклад, коли O подвоюється як ліве і праве око)? Чи слід трактувати це як перекриття?
Joey Adams

@Joey Adams: це відбувається в останньому прикладі.
Lowjacker

@Joey Adams @Lowjacker Так, як і останній приклад.
Гарет

Мені здається, що обличчя 3х3 реалістичне та обличчя 7х7 обличчя. Просто моя думка. Сумно, що я не встиг завоювати баунтіс ... :)
Томмед 23.03.14

2
@tomsmeding Якщо ви вважаєте, що обличчя 3х3 реалістично, мені б не хотілося бачити людей, з якими ви спілкуєтесь. : - \
Гарет

Відповіді:


19

Рубі, 304 298 295 символів

I=$<.read
q=(O=I*s=1).size
k=??+O=~/$/
o=->m,n{n.chars{|c|(m+=1)*(m%k)>0&&m<q&&O[m-1]=c}}
q.times{f=[[?\\+?_*s+?/,k*s+=1],[?O,0],[?O,s],[?O,(s+=1)/2*(1+k)]]
q.times{|x|f.all?{|a,b|I[x+b,a.size]==a}&&(o[x+k*s-1,o[x-k-1,?++?-*s+?+]]
s.times{|a|o[x+k*a-1,?|+' '*s+?|]}
f.map{|a,b|o[x+b,a]})}}
$><<O

Праворуч внизу бажано при перекритті, якщо грані однакового розміру. Напр. Для введення

O.OO.O
.O..O.
\_/\_/
O.OO.O
.O..O.
\_/\_/

він розпізнає всі чотири грані та результати

O |O O
 O| O
--+---
O |O O
 O| O
\_|\_/

Редагувати 1: Як запропонував Lowjacker, ми можемо замінити регекс- indexматч (-3 символи). Більше того, +1можна компенсувати додатковий манекенний знак до відповідності, який зберігає інший знак (-2 +1для манекена, +3 для манекена, -2, оскільки дужки більше не потрібні). Ще два, оскільки ми можемо записати діапазон також без дужок.

Змінити 2: Ще два символу , збережені шляхом заміни як ifз &&і ще один повністю видалити діапазон.


Ви можете використовувати (O=~/$/)замість O.index($/)третього рядка (зберігає 3 символи).
Lowjacker

@Lowjacker Дякую Я навіть міг би зберегти ще один твій трюк (див. Мою редакцію).
Говард

Я думаю, ви також можете зберегти два символи, замінивши ifзаяви на &&.
Lowjacker

4

Пітон - 1199 941

Я вважав проблему досить цікавою, тому вирішив у Python. Ось стислий код.

#!/usr/bin/env python
import fileinput,sys
m=[[c for c in l if c!='\n'] for l in fileinput.input()]
X=len(m[0])
Y=len(m)
t=[]
for n in range(3,min(X,Y)+1,2):
  for x in range(X-n+1):
    for y in range(Y-n+1):
      if m[y][x]=='O' and m[y][x+n-1]=='O' and m[y+(n//2)][x+(n//2)]=='O' and m[y+n-1][x]=='\\' and m[y+n-1][x+n-1]=='/' and "".join(m[y+n-1][x+1:x+n-1])=='_'*(n-2):
        t.append((x,y,n))
for x,y,n in t:
  def a(v,h,c):
    w=x+h; z=y+v;
    if z>=0 and z<len(m):
      if w>=0 and w<len(m[y]):
        m[z][w]=c
  for v in range(n):
    for h in range(n): 
      a(v,h,' ')
  a(0,0,'O')
  a(0,n-1,'O')
  a(n/2,n/2,'O')
  a(n-1,0,'\\')
  a(n-1,n-1,'/')
  for w in range(1,n-1):
    a(n-1,w,'_')
  for v in [-1,n]:
    for h in range(n):
      a(v,h,'-')
  for h in [-1,n]:
    for v in range(n):
      a(v,h,'|')
  a(-1,-1,'+')
  a(-1,n,'+')
  a(n,-1,'+')
  a(n,n,'+')
for l in m:
  for c in l:
    sys.stdout.write(c)
  print

Ось більш читабельний код:

#!/usr/bin/env python

import fileinput, sys

matrix = [[c for c in l if c != '\n'] for l in fileinput.input()]

max_X = len(matrix[0])
max_Y = len(matrix)

tuples = []
for n in range(3, min(max_X, max_Y)+1, 2):
  for x in range(max_X-n+1):
    for y in range(max_Y-n+1):
      # if is_face(matrix, x, y, n):
      if matrix[y][x] == 'O' and matrix[y][x+n-1] == 'O' and matrix[y+(n//2)][x+(n//2)] == 'O' and matrix[y+n-1][x] == '\\' and matrix[y+n-1][x+n-1] == '/' and "".join(matrix[y+n-1][x+1:x+n-1]) == '_'*(n-2) :
        tuples.append((x, y, n))

for x,y,n in tuples:
  # blank_and_border(matrix,x,y,n)
  def assign(dy, dx, c):
    xx = x + dx; yy = y + dy;
    if yy >= 0 and yy < len(matrix) :
      if xx >= 0 and xx < len(matrix[y]) :
        matrix[yy][xx] = c

  # blank
  for dy in range(n):
    for dx in range(n): 
      assign(dy, dx, ' ')

  # face
  assign(0, 0, 'O')
  assign(0, n-1, 'O')
  assign(n/2, n/2, 'O')
  assign(n-1, 0, '\\')
  assign(n-1, n-1, '/')
  for w in range(1,n-1):
    assign(n-1, w, '_')

  # border
  for dy in [-1,n]:
    for dx in range(n):
      assign(dy, dx, '-')

  for dx in [-1,n]:
    for dy in range(n):
      assign(dy, dx, '|')

  assign(-1, -1, '+')
  assign(-1,  n, '+')
  assign( n, -1, '+')
  assign( n,  n, '+')

for l in matrix:
  for c in l:
    sys.stdout.write(c)
  print

2
Будь ласка, додайте у відповідь свою версію для гольфу над цією версією. Це питання з кодовим гольфом, і ви ризикуєте отримати голоси, якщо ви хоч би не намагалися його пограти. Ви можете залишити свою читану версію і тут.
Гарет

1
Прямо, @Gareth. Я часто пишу рішення на Java, що не дуже зручно для гольфу, але я завжди витрачаю час на те, щоб розв'язати своє рішення, як на вправу (це цікаво роздумувати про способи обрізання персонажів та зменшення загальної довжини), так і для задоволення духу code-golf (що дозволяє отримати рішення максимально стисло). Тож, з нетерпінням чекаю Вашого рішення про гольф, sgauria!
ПрограмістDan

Дякую Гарет & @ProgrammerDan! Це хороша порада - я досить новачок у кодегольфі. Я додав моє гольф-рішення вище на додаток до більш тривалого рішення.
sgauria
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.