두더지에서 산 만들기

12

두더지와 산이있는 일련의 지형이 제공됩니다.

                        /\
                       /  \
              _/\__   /    \
          ___/     \_/      \_
____/\___/                    \___

당신의 임무는 문자열의 모든 두더지를 같은 기둥에 중심을 둔 동등한 산으로 대체하는 것입니다. 나머지 문자열은 영향을받지 않아야합니다. 문자열의 시작 부분에 추가 줄이 필요할 수 있습니다.

두더지가 지형 내려가는 곳 지형 올라간다 인접 열로 구성, 바로 인접한 컬럼 하였다. 가장 짧은 변의 너비는 정확히 1 열이어야합니다.

이들은 모두 두더지입니다.

_____/\______

   /\________
__/

________/\
          \__

\           /
 \         /
  \       /
   \     /
    \/\_/

이들은 두더지 가 아닙니다 .

    /\
___/  \______

      ___
_____/   \___

____  _______
    \/

산 두더지 같지만, 짧은 쪽이 높은 대신에 하나의 네 줄 것이다.

예

                  /\
                 /  \
           ->   /    \
____/\____    _/      \_

                       /\
                      /  \
                     /    \
           __ ->    /      \__
_     /\__/      __/
 \___/

                         /\
                        /  \
               ->      /    \
  /\                /\/      \
_/  \__/\_____    _/          \_

_                _    _                _
 \              /      \      /\      /
  \            /        \    /  \    /
   \          /          \  /    \  /
    \        /     ->     \/      \/
     \      /
      \    /
       \/\/

                             /\      /\
                            /  \    /  \
                           /    \  /    \
_                     -> _/      \/      \
 \                                        \
  \                                        \
   \/\______/\_______                       \_

                        /\                           /\       /\
                       /  \               /\        /  \     /  \
              _/\__   /    \       ->    /  \      /    \   /    \
          ___/     \_/      \_          /    \  __/      \_/      \_
____/\___/                    \___    _/      \/                    \___

추가 규칙

  • 표준 허점 은 금지되어 있습니다.
  • 입력 및 출력은 임의의 합리적인 형식 일 수 있습니다.
  • 입력 문자열에 후행 공백이 있다고 가정 할 수 있습니다.
  • 줄의 측면과 필요한 산 사이에 두더지 사이에 항상 충분한 공간이 있어야합니다.
  • 두더지가 산으로 바뀌면 추가 두더지가 생기면 두더지를 산으로 바꿀 필요가 없습니다.
  • 지형은 동일한 열에서 위아래로 이동할 수 없습니다. 이 경우 지형이 움직이지 않습니다.
  • 특정 기둥이 산의 일부가 아닌 경우 높이가 변경되지 않아야합니다.

이것은 code-golf 이므로 바이트 단위의 최단 답변이 이깁니다.

code-golf  ascii-art 
— 라면
소스
이것은 좋은 도전입니다!
— Galen Ivanov
두 번째 마지막 예는 7과 1이 아니라 4와 4로 끝나야한다고 생각합니다.
— ngm
1
당신의 의도가 첫 번째와 마지막 문자가 수직 위치를 변경하지 않아야 하고 또한이 가능한 한 적은 수의 문자를 변경해야합니다으로 ? 이것은 두 번째 예가 유일한 정답 일 경우 특히 예에서 제안하는 것 같습니다.
— ngm
1
이러한 요점을 명확히하기 위해 시도 사양을 편집하는 것이 좋습니다.
— ngm
1
또한 마지막 규칙 인 "지형은 같은 열에서 위아래로 이동할 수 없습니다"는 무엇을 의미합니까? 분명히 "지형"은 세 캐릭터 중 하나 일 뿐이 /, \, _므로 어떻게 동시에 상하로 올라갈 수 있을까요?
— Chas Brown

답변:

2

파이썬 2 , 509 495 480 바이트

def f(S):
 B='\\';F='/';s=''.join(map(max,*S.split('\n')));t=list(re.sub(r'..((./\\[^\\])|([^/]/\\.))..',r'////\\\\\\\\',s));C=s.count;D=t.count;d=C(F)-D(F)+D(B)-C(B);m=[{'_':F,B:'_'},{'_':B,F:'_'}][d<0];d=abs(d);i=1
 while d:
	if s[i]!=t[i]:i+=7
	elif t[i]in m:d-=1;t[i]=m[t[i]]
	i+=1
 return'\n'.join(u for u in map(''.join,zip(*[u.ljust(2*len(S))for u in reduce(lambda (a,p),c:(a+[' '*[p,p-1][c==B]+c],p+[[0,-1][c==B],1][c==F]),t,([],len(t)))[0]]))[::-1]if u.strip())
import re

온라인으로 사용해보십시오!

실제 규칙이 무엇인지 여전히 명확하지 않습니다. 그러나 다음은 두더지가 산으로 바뀌는 규칙을 넘어서는 추가적인 제약 사항입니다.

  • 출력의 첫 번째 및 마지막 지형 문자는 _유효한 입력과 마찬가지로이어야합니다.
  • 첫 번째 _와 마지막 사이의 수직 차이 _는 입력과 출력 사이에서 유지되어야합니다.
  • 두더지가 산으로 바뀌는 대신에, 그 수직적 차이를 유지하기 위해 다른 문자들을 변경해야 할 수도 있습니다. 그러나 변경된 문자는 두더지에서 만들어진 산의 일부가 아니어야합니다.
  • 이러한 변경을 수행 할 때 변경된 추가 문자 수는 최소화되어야합니다.

Ungolfed 알고리즘 :

def f(s):
    s = ''.join(map(max,*s.split('\n'))) # flatten into a single line
    t = re.sub(r'..((./\\[^\\])|([^/]/\\.))..',r'////\\\\\\\\',s) # replace molehills with mountains
    d = s.count('/')-t.count('/')+t.count('\\')-s.count('\\') # are the two strings equally balanced?
    m=[{'_':'/','\\':'_'},{'_':'\\','/':'_'}][d<0] # make an appropriate mapping...
    d=abs(d);i=1 # skip over leading '_'...
    while d: # while still unbalanced...
        if s[i]!=t[i]:i+=7 # skip over any created mountains (7+1==8)
        elif t[i] in m:d-=1;t = t[:i]+m[t[i]]+t[i+1:] # if can replace, do replace
        i += 1 # next char
    t = reduce(lambda (a,p),c:(a+[' '*[p,p-1][c=='\\']+c],p+[[0,-1][c=='\\'],1][c=='/']),t,([],len(t)))[0]  # pad spaces at left side
    t = map(''.join,zip(*[u.ljust(max(map(len,t))) for u in t])) # rotate
    return '\n'.join(u for u in t[::-1] if u.strip()) # reverse and join into lines.
import re
— 체스 브라운
소스
1

빨강 , 855, 845 833 바이트

func[s][r: split s"^/"c: charset"\_/"m: copy #()repeat n l: length? r[parse r/:n[any[i:
c(put m 1 + offset? r/:n i reduce[first i n])| skip]]]m: extract next sort/skip to-block m
2 2 e: copy[]parse b: rejoin collect[foreach c m[keep c/1]][any[c:["/\_"|"/\/"](alter
e 1 + offset? b c)| c:["_/\"|"\/\"](alter e 2 + offset? b c)| skip]]y: 0 foreach a e[q: p:
d: -3 + min m/(a - 4)/2 m/(a + 5)/2 if d < y[y: d]j: i: a until[m/:i/1: #"/"m/:i/2: p k: i
- 2 if all[k > 0 #"_"= m/:k/1 p = m/:k/2][m/(k + 1)/1: #"_"m/(k + 1)/2: p break]i: i - 1
m/:i/2 < p: p + 1]j: j + 1 until[m/:j/1: #"\"m/:j/2: q k: i + 2 if all[#"_"= m/:k/1
p = m/:k/2][m/(k - 1)/1: #"_"m/(k - 1)/2: p break]j: j + 1 m/:j/2 < q: q + 1]]y: y - 1 q:
collect[loop l - y[k: copy""keep pad k p: length? m]]repeat n p[w: m/1/2 - y
q/:w/:n: m/1/1 m: next m]foreach d q[print d]]

온라인으로 사용해보십시오!

골프 솔루션과는 거리가 멀다 ... 테스트 사례를 통과하지만 다른 이상한 패턴에서는 실패 할 것이다.

더 읽기 쉬운 :

f: func [ s ] [
    r: split s "^/"
    c: charset "\_/"
    m: copy #()
    repeat n l: length? r[
        parse r/:n[ any [ i: c(put m 1 + offset? r/:n i reduce[ first i n ])
        | skip]]
    ]
    m: sort/skip to-block m 2
    m: extract next m 2
    b: rejoin collect [ foreach c m [ keep c/1 ] ]
    e: copy []
    parse b [ any [ c: [ "/\_" | "/\/" ]
                (alter e 1 + offset? b c)
            | c: [ "_/\" | "\/\" ]
                (alter e 2 + offset? b c)
            | skip
        ]
    ]
    y: 0
    foreach a e [
        q: p: d: -3 + min m/(a - 4)/2 m/(a + 5)/2
        if d < y [ y: d ]
        j: i: a
        until [
            m/:i/1: #"/"
            m/:i/2: p
            k: i - 2
            if all [ k > 0
                     #"_" = m/:k/1
                     p = m/:k/2
            ] [ 
                m/(k + 1)/1: #"_"
                m/(k + 1)/2: p
                break
            ]
            i: i - 1
            p: p + 1 
            m/:i/2 < p
        ]
        j: j + 1
        until[
            m/:j/1: #"\"
            m/:j/2: q
            k: i + 2
            if all [ #"_" = m/:k/1 
                     p = m/:k/2
            ] [
                m/(k - 1)/1: #"_"
                m/(k - 1)/2: p
                break
            ]
            j: j + 1
            q: q + 1 
            m/:j/2 < q
        ]
    ]
    y: y - 1
    q: collect [
        loop l - y [
            k: copy ""
            keep pad k p: length? m
        ]
    ]
    repeat n p [ w: m/1/2 - y
                 q/:w/:n: m/1/1
                 m: next m ]
    foreach d q [ print d ]
]
— 갈렌 이바노프
소스
당사 사이트를 사용함과 동시에 당사의 쿠키 정책과 개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.