양의 정수 N ( "virality")이 주어지면 프로그램은 왼쪽 상단에서 아래쪽으로 및 / 또는 오른쪽으로 연장되는 길이 N 의 두 가지 분기가있는 트리의 ASCII 그림을 작성해야합니다 .

첫 번째 별표 이후 각 지점에서 취한 방향 은 오른쪽 또는 아래쪽 일 수 있으며이 선택은 다음 단계마다 무작위로 ¹ 로 설정 해야합니다 .

예를 들어, 입력이 5이면 출력은 다음과 같습니다.

***
* ***
**
 **

두 개의 브랜치는 접촉 할 수 있지만 (인접한 셀에 있음) 겹치지 않아야합니다 (동일한 셀에 있음). 따라서 다음은 허용되지 않습니다.

***
* *
*****
  *
  *

예

input 1의 경우 가능한 출력은 다음과 같습니다.

**
*

(두 분기가 동일한 경로를 사용하면 겹쳐 질 수 있으므로 모든 유효한 출력에 나타납니다.)

입력에 가능한 출력은 3다음 과 같습니다.

***
* *
**

**
***
*
*

입력의 경우 7:

****
*  **
*   **
*
***
  *

입력의 경우 10:

****
*  *      
*********
  *
  *****

이것은 코드 골프따라서 가장 짧은 유효한 답변 (바이트)이 이깁니다.

^{1. 이것은 일정하게 무작위로 (즉, 각 방향의 50/50 확률), 또는 일반 하드웨어에서 얻을 수있는만큼 무작위로 근접해야합니다.}

CJam , 58 51 바이트

[TT]{_2_m*\f.+{:-},mR}ri*]ee{~\)S*\{'*t}/}%::a:.+N*

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

기본 아이디어는 시작 [0 0]하여 각 요소에 반복적으로 0 또는 1을 추가하고 (중복을 피하기 위해 시작하지 않는 한 절대로 같지 않도록) 모든 중간 결과를 수집하는 것입니다.

[[0 0] [0 1] [0 2] [0 2] [1 3]]

그런 다음 각 하위 배열 *에 원래 배열의 해당 쌍이 제공하는 인덱스에 다른 배열을 포함하는 큰 배열 배열을 만듭니다 .

["*"
 "**"
 "* *"
 "* * "
 " * * "]

그러면 출력 행렬의 대각선 조각이 생성됩니다 (왼쪽에서 오른쪽으로 이동하면 실제 행렬에서 오른쪽 위에서 왼쪽 아래로 이동하는 것에 해당).

그런 다음 ::a:.+"비대화 (de-diagonalize)"하고 결과 라인을 얻는 데 사용할 수 있습니다 .

[ "**** "
  "*  *"
  "** "
  " *"
  ""     ]

숯 , 31 24 바이트

Ｆ²«Ｊ⁰¦⁰Ｆ⊕θ«¿ι*↓*≔‽²ι¿ＫＫ↗

온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 원래 나는 첫 단계를 무작위로 만드는 것이 더 쉬울 것이라고 생각했지만 첫 번째 지점을 예측 가능하게 만드는 것은 골퍼였습니다. 설명:

Ｆ²«

index variable을 사용하여 두 번 반복하십시오 i. (실제로 암시 적 목록을 반복하므로 i루프 내에서 변경하는 것이 안전합니다 .)

Ｊ⁰¦⁰

캔버스의 원점으로 이동합니다.

Ｆ⊕θ«

루프 N+1타임.

¿ι*↓*

를 인쇄 *하되, 값에 따라 커서를 오른쪽 또는 아래쪽에 둡니다 i.

‽²ι

i내부 루프의 다음 반복 에 대한 값을 랜덤 화하십시오 .

¿ＫＫ↗

현재 캐릭터가 인 경우 *, 이것은 우리가 두 번째 분기이고 오른쪽 대신 아래로 내려 갔음을 의미합니다. 첫 번째 분기는 항상 아래쪽으로 시작하므로 두 번째 분기는 항상 그 위에 있으므로 세로 충돌 만 확인하면됩니다.

자바 10, 273 272 268 239 바이트

n->{var c=new char[++n][n];for(var d:c)java.util.Arrays.fill(d,' ');for(int i=0,j=0,k=0,l=0,r=0,s=0,t=0,u=0;n-->0;){c[i+=r][j+=s]=c[k+=t][l+=u]=42;do{r=t=2;r*=Math.random();t*=Math.random();s=r^1;u=t^1;}while(i+r==k+t&j+s==l+u);}return c;}

여기에서 온라인으로 사용해보십시오 .

29 바이트 골프 를 한 Kevin Cruijssen 에게 감사 합니다.

언 골프 버전 :

n -> { // lambda taking an int as argument
    var c = new char[++n][n]; // the output; increment the virality since the root does not count
    for(var d : c) // for every line
        java.util.Arrays.fill(d,' '); // initialize it with spaces
    for(int i = 0, j = 0, // coordinates of the first branch
            k = 0, l = 0, // coordinates of the second branch
            r = 0, s = 0, // offsets for the first branch, one will be 0 and the other 1 always except for the first '*' where the two branches overlap
            t = 0, u = 0; // offsets for the second branch, one will be 0 and the other 1 always except for the first '*' where the two branches overlap
        n-- > 0; ) { // decrement virality and repeat as many times
        c[i+=r][j+=s] = c[k+=t][l+=u] = 42; // move according to offsets and place an '*' for each branch, 42 is ASCII code
        do { // randomly pick offsets for both branches
            r = t = 2; // Math.random() provides results in [0,1)
            r *= Math.random(); // flip a coin for the first branch
            t *= Math.random(); // flip another coin for the second
            s = r^1; // set s to 0 if r=1, to 1 if r=0
            u = t^1; // set u to 0 if t=1, to 1 if t=0
        } while(i+r==k+t&j+s==l+u); // repeat if the branches overlap
    }
    return c; // return the output
}

펄 5 , 208 124 122 118 바이트

줄 바꿈, 들여 쓰기 및 주석없이 118 바이트. 소요 N은 표준 입력에서 :

@b=1..2;                            #number of branches is 2
for(1..<>){                         #add length <> (the input) to each branch
  ($x,$y)=@$_                       #get where current branch has its tip now
 ,.5>rand?$x++:$y++                 #increase either x or y
 ,$o[$y][$x]++&&redo                #try again if that place is already occupied
 ,$_=[$x,$y]                        #register new tip of current branch
   for@b                            #...and do all that for each branch 
}
say map$_||!$i++?'*':$",@$_ for@o;  #output the branches

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

파이썬 2 , 204 바이트

from random import*
N=input()
s=eval(`[[' ']*-~N]*-~N`)
s[0][0]='*'
I=x,y=1,0
J=X,Y=0,1
exec"s[y][x]=s[Y][X]='*';i,j,k,l=choice((J+I,I+I,I+J,J+J)[x-2<X:]);x+=i;y+=j;X+=k;Y+=l;"*N
for i in s:print`i`[2::5]

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

펄 5 -a , 97 96 93 92 바이트

오른쪽, 아래쪽 또는 꺼짐 대각선 바이어스가 없습니다.

#!/usr/bin/perl -a
@;=[1];map{$x=$y=0;map++(.5<rand?$x:$y)*$;[$y][$x]++&&redo,1.."@F"}1,2;say+($","*")[@$_]for@

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

PHP, 118 바이트

for($r="*",$w=$argn+2;$argn--;$r[$q+=rand(0,$r[$q+1]<"*")?:$w]=$r)$r[$p+=rand(!$i++,1)?:$w]=$r;echo wordwrap($r,$w-1);

Elvis 연산자에는 PHP 5.4 이상이 필요합니다. 교체 ?:로 ?1:오래된 PHP를 위해.

파이프로 실행 -nR하거나 온라인으로 사용해보십시오 .

빨강 , 195 190 바이트

func[n][g: func[s][i: 0 d: s while[i < n][b/(d): #"*"until[r: 1 if 1 = random 2[r: n + 1]b/(d + r) =#" "]d: d + r
i: i + 1]]b:""loop n[loop n[append b" "]append b"^/"]b/1: #"*"g n + 2 g 2 b]

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

읽을 수있는 :

f: func[n][
    g: func[s][
        i: 0
        d: s
        while[i < n][
            b/(d): #"*"
            until[
                r: 1 if 1 = random 2[r: n + 1]
                b/(d + r) = #" "
            ]
            d: d + r
            i: i + 1
        ]
    ]
    b: ""
    loop n[loop n[append b " "]append b "^/"]
    b/1: #"*"
    g n + 2
    g 2
    b
]

젤리 , 50 43 41 바이트

2ḶẊ⁸С+\‘Ṗ
⁸ÇU;Ǥ⁻Q$¿
‘,þ`⁼€þÇS+»þ`Ị$ị⁾* 

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

이것은 정말로 재미있는 글이었습니다. 훨씬 더 최적의 방법이있을 수 있습니다. 이 방법에는 골프가 있을지도 모릅니다.

내가 이것을 게시 한 직후에 ,þ`대신 사용할 수 있음을 깨달았습니다 aþ,""oþ`Ɗ.

R , 148142 바이트

n=scan();`~`=sample;o=r=k=1;l=c(1,n);for(i in 1:n){r=r+l~1;t=l~1;k=k+"if"(k+t-r,t,l[l!=t]);o=c(o,r,k)};write(c(" ","*")[1:n^2%in%o+1],1,n,,"")

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

또한 출력 사양에 맞지 않지만 두 가지를 구분할 수 있습니다. 온라인으로 사용해보십시오!

설명:

인덱스에서 시작 1, 우리는 무작위 지점의 오른쪽 또는 왼쪽으로 이동을 선택 r추가 n또는 1각각. 그런 다음 branch k에 대해 다른 오른쪽 또는 왼쪽 이동을 r선택하고 진행 방향 과 교차하는 경우 다른 방향을 선택합니다. 그럼 우리가 사용 r하고 k의 인덱스 등 m으로 그 값을 설정 "*". 반복 n-1시간, 결과를 인쇄합니다.

젤리 , 39 38 바이트

ḣ2+\€Ẏ
2Rd¤ṗẊÇ⁻Q$$¿Ç0,0ṭ‘Ṭ€×þ/$€Sị⁾* Y

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

관련이 없어 보이지만 d여기에서 바이트를 저장하는 데 유용합니다 (이전의 접근법보다).

파이썬 (2) , 191 (187) 176 바이트

from random import*
n=input()
p,q=c=1,1j;s={p,q,0}
exec'z=choice(c);q,p=p+[z,1+1j-z][p+z in s],q;s|={q};'*2*~-n
R=range(n+1)
for y in R:print''.join(' *'[y+x*1jin s]for x in R)

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

파이썬은 복잡한 형태의 폼을 기본적으로 지원합니다 a+bj. 이것은 2D 문제를 좀 더 다루기 쉽게 만듭니다 ...