양의 정수가 주어지면 선행 0이없는 기본 표현에 포함되지 않는 n가장 작은 기본을 출력합니다 . 모든 입력에 대해 가정 할 수 있습니다 .b >= 2nb0b <= 256

테스트 사례

1 -> 2 (1)
2 -> 3 (2)
3 -> 2 (11)
4 -> 3 (11)
5 -> 3 (12)
6 -> 4 (12)
7 -> 2 (111)
10 -> 4 (22)
17 -> 3 (122)
20 -> 6 (32)
50 -> 3 (1212)
100 -> 6 (244)
777 -> 6 (3333)
999 -> 4 (33213)
1000 -> 6 (4344)
1179360 -> 23 ([12, 9, 21, 4, 4])
232792560 -> 23 ([15, 12, 2, 20, 3, 13, 1])
2329089562800 -> 31 ([20, 3, 18, 2, 24, 9, 20, 22, 2])
69720375229712477164533808935312303556800 -> 101 ([37, 17, 10, 60, 39, 32, 21, 87, 80, 71, 82, 14, 68, 99, 95, 4, 53, 44, 10, 72, 5])
8337245403447921335829504375888192675135162254454825924977726845769444687965016467695833282339504042669808000 -> 256 ([128, 153, 236, 224, 97, 21, 177, 119, 159, 45, 133, 161, 113, 172, 138, 130, 229, 183, 58, 35, 99, 184, 186, 197, 207, 20, 183, 191, 181, 250, 130, 153, 230, 61, 136, 142, 35, 54, 199, 213, 170, 214, 139, 202, 140, 3])

Pyth , 6 바이트

f*FjQT

모든 테스트 사례를 확인하십시오.

작동 원리

f * FjQT ~ 전체 프로그램.

f ~ 조건이 진실 인 첫 번째 양의 정수.
   jQT ~ 현재 요소의 밑으로 변환 된 입력.
 * F ~ 제품. 목록에 0이 포함되어 있으면 0입니다. 그렇지 않으면 엄격하게 양수입니다.
          0-> 거짓; > 0-> Truthy.
        ~ 결과를 암시 적으로 출력합니다.

Pyth f는 1, 2, 3, 4, ...(1에서 시작)에 작동 하지만 Pyth 는 기수 1 (단항)의 숫자를 0으로 처리하므로 기수 1은 무시됩니다.

C,  52  50 바이트

i,k;f(n){for(i=2,k=n;k;)k=k%i++?k/--i:n;return i;}

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

C (gcc),  47  45 바이트

i,k;f(n){for(i=2,k=n;k;)k=k%i++?k/--i:n;n=i;}

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

@Kevin Cruijssen의 답변에 대한 @Nevay의 제안 덕분에 2 바이트가 절약되었습니다!

하스켈 , 56 52 48 바이트

b#n=n<1||mod n b>0&&b#div n b
f n=until(#n)(+1)2

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

꽤 기본이지만 단축하는 좋은 방법을 생각할 수 없습니다.

편집 : 4 바이트를 절약 해준 Laikoni에게 감사드립니다! 내가 왜 생각하지 못했는지 모르겠다 !!0. 아마 그 괄호를 제거하려고했습니다해야하지만 사용하려고하면 좀 이상한 오류의 막연한 기억을 가지고 ||와 &&함께. 어쩌면 나는 평등 연산자와 혼동하고 있습니다.

편집 2 : 다른 4 바이트를 면도 해 주셔서 감사합니다 @ Liny! 내가 until전에 몰랐던 방법을 모른다 .

Wolfram Language (Mathematica) , 33 바이트

2//.i_/;DigitCount[#,i,0]>0:>i+1&

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

껍질 , 7 바이트

→V▼MBtN

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

설명

→V▼MBtN
     tN    list of natural numbers starting from 2
   MB      convert the (implicit) input to each of those bases
 V▼        find the (1-based) index of the first result where the minimum digit is truthy
→          add 1 to this index

파이썬 2 , 57 바이트

n=x=input()
b=2
while x:z=x%b<1;b+=z;x=[x/b,n][z]
print b

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

이것은 재귀 함수보다 1 바이트 짧습니다.

f=lambda n,b=1,x=1:b*(x<1)or f(n,b+(x%b<1),[x/b,n][x%b<1])

젤리 , 7 바이트

2b@Ạ¥1#

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

05AB1E , 6 바이트

Adnan 덕분에 -4 바이트

1µNвPĀ

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

껍질 , 9 바이트

←foΠ`B⁰tN

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

설명

            -- input N
        tN  -- tail of [1..] == [2..]
←f(    )    -- filter with the following:
    `B⁰     --   convert N to that base
   Π        --   product (0 if it contains 0)
←           -- only keep first element

자바 8, 61 56 54 바이트

n->{int b=2,t=n;for(;t>0;)t=t%b++<1?n:t/--b;return b;}

여기에서 시도하십시오.

설명:

n->{            // Method with integer as both parameter and return-type
  int b=2,      //  Base-integer, starting at 2
      t=n;      //  Temp-integer, copy of the input
  for(;t>0;)    //  Loop as long as `t` is not 0
    t=t%b++<1?  //   If `t` is divisible by the base `b`
                //   (and increase the base `b` by 1 afterwards with `b++`)
       n        //    Set `t` to the input `n`
      :         //   Else:
       t/--b;   //    Divide `t` by the `b-1`
                //    (by decreasing the base `b` by 1 first with `--b`)
                //  End of loop (implicit / single-line body)
  return b;     //  Return the resulting base
}               // End of method

나는 산술 접근법을 사용하여 골프를 칠 수 있다고 생각합니다. 실제로 @Steadybox 'C answer 포트로 @Nevay 덕분에 2 바이트로 골프 를 칠 수 있습니다.

이전 ( 61 바이트 ) 답변 :

n->{int b=1;for(;n.toString(n,++b).contains("0"););return b;}

여기에서 시도하십시오.

설명:

n->{         // Method with Integer as both parameter and return-type
  int b=1;   //  Base-integer, starting at 1
  for(;n.toString(n,++b).contains("0"););
             //  Loop as long as the input in base-`b` does contain a 0,
             //  after we've first increased `b` by 1 before every iteration with `++b`
  return b;  //  Return the resulting base
}            // End of method

Japt , 8 바이트

@ìX e}a2

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

설명

@    }a2

X에서 시작하여 함수를 전달할 첫 번째 숫자 ( )를 반환2

ìX

입력 숫자를 기본 X자릿수 배열로 변환하십시오 .

e

모든 숫자가 정확한지 확인하십시오.

자바 스크립트 (ES6), 43 41 37 바이트

n=>(g=x=>x?g(x%b++?x/--b|0:n):b)(b=1)

테스트 사례

let f =

n=>(g=x=>x?g(x%b++?x/--b|0:n):b)(b=1)

console.log(f(1   )) // 2 (1)
console.log(f(2   )) // 3 (2)
console.log(f(3   )) // 2 (11)
console.log(f(4   )) // 3 (11)
console.log(f(5   )) // 3 (12)
console.log(f(6   )) // 4 (12)
console.log(f(7   )) // 2 (111)
console.log(f(10  )) // 4 (22)
console.log(f(17  )) // 3 (122)
console.log(f(20  )) // 6 (32)
console.log(f(50  )) // 3 (1212)
console.log(f(100 )) // 6 (244)
console.log(f(777 )) // 6 (3333)
console.log(f(999 )) // 4 (33213)
console.log(f(1000)) // 6 (4344)

Brachylog , 11 바이트

;.≜ḃ₎¬∋0∧1¬

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

설명

;.≜ḃ₎           The Input represented in base Output…
     ¬∋0        …contains no 0
        ∧1¬     And Output ≠ 1

파이썬 2 , 57 바이트

n=m=input()
b=2
while m:c=m%b<1;b+=c;m=(m/b,n)[c]
print b

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

Felipe Nardi Batista 에게 감사합니다 .
-2 Lynn 에게 감사합니다 (이제 그녀의 해결책이되었습니다 : D).

APL (Dyalog) , 20 19 바이트

1+⍣{~0∊⍺⊥⍣¯1⊢n}≢n←⎕

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

평소와 같이 채팅을 도와주고 TIO에서 코드를 작동시키는 @ Adám에게 감사합니다. 또한 1 바이트 절약.

이것은 (tradfn된다 트라 itional F unctio N ) 본체. 이를 사용하려면 이름 (TIO의 헤더 필드에 있음)을 ∇지정하고 이름 앞에 하나 (TIO의 바닥 글 필드에 하나)를 넣고 이름을 사용하여 호출해야합니다. ⎕사용자 입력을 받기 위해 쿼드 ( )를 사용하기 때문에 f \n input평소 대신 호출됩니다.f input

방법?

1+⍣{~0∊⍺⊥⍣¯1⊢n}≢n←⎕  ⍝ Main function.
                  n←⎕ ⍝ Assigns the input to the variable n
1+⍣{           }≢     ⍝ Starting with 1, add 1 until the expression in braces is truthy
    ~0∊               ⍝ returns falsy if 0 "is in"
        ⊥             ⍝ convert
            ⊢n        ⍝ the input
         ⍣¯1          ⍝ to base
       ⍺              ⍝ left argument (which starts at 1 and increments by 1)

그런 다음 함수는 결과 기준을 반환합니다.

양성자 , 40 바이트

x=>filter(y=>all(digits(y,x)),2..x+3)[0]

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

R , 79 71 66 63 65 바이트

function(n){while(!{T=T+1;all(n%/%T^(0:floor(log(n,T)))%%T)})T
T}

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

이 답변은 하나의 단일 루프에서 Giuseppe의 재정렬을 기반으로합니다.

JDL 덕분에 8 바이트를 절약하고 주세페 덕분에 6 바이트를 절약했습니다.

MATL , 13 12 바이트

`G@Q_YAA~}@Q

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

Luis Mendo 덕분에 -1 바이트. 이 프로그램은 flintmax기본 데이터 유형이 doubleMATL 이므로 2 ^ 53 ( 부동 소수점 유형으로 표시 할 수있는 최대 연속 정수) 보다 큰 테스트 케이스는 처리하지 않습니다 . 그러나 해당 숫자 아래에서 임의의 0이없는 기준을 찾을 수 있어야합니다.

`            % Do while
 G           %  Push input
  @ _        %  Outputs the iteration number, negate.
     YA      %  Convert input to base given by the iteration number, the negative number is to instruct MATL we want an arbitrary high base with a integer vector rather than the default character vector we know from hexadecimal
       A~    %  If they're not all ones, repeat
         }   % But if they are equal, we finally
          @  %  Push the last base
   Q       Q %  As base 1 makes no sense, to prevent MATL from errors we always increase the iteration number by one.

PHP, 59 + 1 바이트

builtins 사용 , 최대 기본 36 :

for($b=1;strpos(_.base_convert($argn,10,++$b),48););echo$b;

내장 없음, 63 60 + 1 바이트 , 모든 기본 :

for($n=$b=1;$n&&++$b;)for($n=$argn;$n%$b;$n=$n/$b|0);echo$b;

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

사실 ,  12  11 바이트

╗1⌠╜¡m'0<⌡╓

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

이 컨센서스를 사용 합니다 . chat의 바이트 절약 도움말에 대해 Mego 에게 감사드립니다 .

J, 26 바이트

]>:@]^:(0 e.]#.inv[)^:_ 2:

이것이 개선 될 수 있는지 알고 싶습니다.

주 동사는 이단 어입니다.

>:@]^:(0 e.]#.inv[)^:_

이것은 왼쪽의 입력과 오른쪽의 상수 2입니다. 그 주 동사구는 J의 Do.를 사용하지만, 0이 e.기본 y의 원래 인수 의 요소 인 한 올바른 y 인수를 증가시키는 동안 구문을 만듭니다 .

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

루아 , 77 76 바이트

b=2n=...N=n
while~~N>0 do
if N%b<1then
b=b+1N=n
else
N=N//b
end
end
print(b)

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

은하수 , 38 바이트

^^'%{255£2+>:>R&{~^?{_>:<;m_+¡}}^^^}

용법: ./mw base.mwg -i 3

설명

code                                 explanation                    stack layout

^^                                   clear the preinitialized stack []
  '                                  push the input                 [input]
   %{                              } for loop
     255£                             push next value from 0..254   [input, base-2]
         2+                           add 2 to the get the base     [input, base]
           >                          rotate stack right            [base, input]
            :                         duplicate ToS                 [base, input, input]
             >                        rotate stack right            [input, base, input]
              R                       push 1                        [input, base, input, 1]
               &{~             }      while ToS (=remainder) is true ...
                  ^                    pop ToS                      [input, base, number]
                   ?{         }        if ToS (=quotient) ...
                     _>:<;              modify stack                [input, base, number, base]
                           m            divmod                      [input, base, quotient, remainder]
                           _+¡         else: output ToS (0) + SoS and exit
                                ^^^   pop everything but the input.

for 루프 대신 while 루프를 사용하여 이것이 단축 될 수 있다고 확신하지만 작동시키지 못했습니다.

스택 형 , 23 바이트

{!2[1+][n\tb all]until}

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

이 증분 ( [1+]) J 개의 (부터 2기저 상태) _J의 상기 입력 표현이 더 제로가 없다 ( all및 until).

펄 5 , 52 + 2 ( -pa) = 54 바이트

$\=1;while($_&&=$F[0]){$\++;$_=int$_/$\while$_%$\}}{

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