도전

밑이 이고 색인 주어지면 출력 항 는 다음과 같이 정의됩니다.$1 < b < 10$$t \ge 1$$x_t$

• $x_1 = 11_{10}$
• $x_{i+1}$ 를 밑수 로 변환 한 다음 밑수 다시 해석하여 을 구합니다$x_i$$b$$10$
• 출력은 이어야합니다.$10$

5 번 항의 5 단계는 다음과 같습니다.

• $x_1 = 11_{10}$ 입니다.
• $11_{10} = 21_{5}$ x 2 = 21 10 이므로 입니다.$x_2 = 21_{10}$
• $21_{10} = 41_{5}$ x 3 = 41 10 이므로 입니다.$x_3 = 41_{10}$
• $41_{10} = 131_{5}$ x 4 = 131 10 이므로 입니다.$x_4 = 131_{10}$
• $131_{10} = 1011_{5}$ 이므로 입니다.$x_5 = 1011_{10}$
• 문자열 "1011"또는 정수를 출력합니다 1011.

테스트 사례

참고 : 이들은 하나의 색인입니다

base 2, term 5 --> 1100100111110011010011100010101000011000101001000100011011011010001111011100010000001000010011100011
base 9, term 70 --> 1202167480887
base 8, term 30 --> 4752456545
base 4, term 13 --> 2123103032103331200023103133211223233322200311320011300320320100312133201303003031113021311200322222332322220300332231220022313031200030333132302313012110123012123010113230200132021023101313232010013102221103203031121232122020233303303303211132313213012222331020133

노트

• 표준 허점은 허용되지 않습니다
• 모든 기본 I / O 방법이 허용됩니다
• 대해 다른 색인 (예 : 0 색인, 1 색인, 2 색인 등)을 사용할 수 있습니다$t$
• 첫 번째 항을 출력 할 수 있습니다 .$t$
• 이것이 code-golf 이므로 해당 언어에 가장 짧은 코드가 승리합니다.

자바 스크립트 (Node.js) , 40 바이트

이 버전에서 5 바이트를 저장하고 BigInt 버전에서 2 바이트를 저장 한 @Neil에게 감사합니다.

입력을로 취합니다 (t)(base). 여기서 $t$ 는 1 색인입니다.

n=>g=(b,x=11)=>--n?g(b,+x.toString(b)):x

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

JavaScript (Node.js) , 48 바이트 (BigInt 버전)

입력을로 취합니다 (t)(base). 여기서 $t$ 는 1 색인입니다. BigInt를 리턴합니다.

n=>g=(b,x=11n)=>--n?g(b,BigInt(x.toString(b))):x

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

05AB1E , 5 바이트

>IF¹B

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

설명

>       # increment <base>
 IF     # <term> times do:
   ¹B   # convert from base-10 to base-<base>

11 에서 시퀀스를 명시 적으로 시작할 필요는 없습니다 .
시작 base+1하여 추가 반복을 수행하면 첫 번째 반복이 11을 제공 합니다.

Japt , 9 바이트

ÆB=sV n
B

시도 해봐

(Two inputs, U and V)
Æ            Range [0..U)
 B=          For each, set B (B is preinitialized to 11) to 
   sV          B's previous value converted to base-V
   n           and back to base-10
B            Print out B's final value

Wolfram Language (Mathematica) , 46 바이트

bNest[FromDigits[#~IntegerDigits~b]&,11,#]&

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

로 전화하십시오 f[base][t]. 인덱스가 0입니다.

레티 나 , 67 바이트

.+,(\d+)
11,$1*
"$+"{`^\d+
*
)+`(?=_.*,(_+))(\1)*(_*)
$#2*_$.3
,_+

온라인으로 사용해보십시오! 쉼표로 구분 된 입력 $t$ (0 색인) 및 $b$ 취 합니다. 단항으로 모든 계산을 수행하면 많은 시간이 초과됩니다. 설명:

.+,(\d+)
11,$1*

$x_0=11$$b$

"$+"{`

$t$

^\d+
*

$x_i$

)+`(?=_.*,(_+))(\1)*(_*)
$#2*_$.3

$b$

,_+

$b$

파이썬 2 , 71 바이트

def f(b,n):h=lambda x:x and x%b+10*h(x/b);return n and h(f(b,n-1))or 11

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

인덱스가 0입니다.

클로저 , 109 바이트

불필요한 공간을 찾아서 10 바이트를 제거한 MilkyWay90의 크레딧 다른 불필요한 공간에서 다른 바이트에 대한 무지의 실시 예

골프

(defn f([b t](f b t 11))([b t v](if(= t 1)v(f b(dec t)(read-string(.(new BigInteger(str v))(toString b)))))))

언 골프

(defn f
  ([base term] (f base term 11))
  ([base term value] (if (= term 1)
                      value
                      (f base (dec term) (read-string (. (new BigInteger (str value)) (toString base)))))))

바이트를 저장할 수있는 주요 장소는 다음과 같은 표현이라고 생각합니다 . 그게 뭐든간에. 구체적으로 특별히:

(read-string (. (new BigInteger (str value)) (toString base)))

펄 6 , 28 바이트

{(11,+*.base($^b)...*)[$^t]}

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

시퀀스의 인덱스는 0부터 시작합니다.

젤리 , 8 7 바이트

‘b³Ḍ$⁴¡

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

$b$$t$$b + 1$

설명

‘b³Ḍ$⁴¡ | Main link: first argument b, second argument t
‘       | b + 1
    $⁴¡ | Repeat the following t times
 b³     | Convert to base b
   Ḍ    | Convert back from decimal to integer

K (ngn / k) , 13 바이트

{y(10/x\)/11}

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

Pyth , 8 바이트

uijGQTEh

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

C # (Visual C # 대화식 컴파일러) , 87 바이트

n=>m=>{int g=11;for(var s="";m-->0;g=int.Parse(s),s="")for(;g>0;g/=n)s=g%n+s;return g;}

@KevinCruijssen 덕분에 5 바이트 절약

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

brainfuck , 270 바이트

++<<++<,+++<-[----->-<]<,,[<-----[->++++++++++<]++>[-<+>],]<[>>>>>>[<<<[->>+<<]>>>>>]<<[[>+<-]>>[-[<++++++++++>-]>+>]<[<<]>>[-<<+>>>+<]>>[-[<-[>>+>>]>>[+[-<<+>>]>[-<]<[>]>++>>>]<<<<<-]+>[-<+<+>>]<<[->>+<<]>>>]<[-]<[[-<+>]<<]<]<[->>+<<]<-]>>>>[>>]<<[>-[-----<+>]<----.<<]

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

인덱스가 0입니다. 반복 횟수는 최대 255 인 것으로 가정합니다.

설명

테이프는 다음과 같이 배치됩니다.

num_iterations 0 0 base digit0 0 digit1 0 digit2 ...

각 숫자는 실제로 해당 숫자에 1을 더한 값으로 저장되며 0은 "더 이상 숫자 없음"으로 예약됩니다. 기본 변환 중에 현재 작업중인 숫자는 한 셀 오른쪽으로 이동하고 기본은 현재 작업 영역의 왼쪽으로 이동합니다.

++<<++              Initialize initial value 11
<,+++<-[----->-<]   Get single digit as base and subtract 48 to get actual number
<,,[<-----[->++++++++++<]++>[-<+>],]   Read multiple digits as number of iterations
<                   Go to cell containing number of iterations

[                   For each iteration:
  >>>>>>              Go to tens digit cell
  [<<<[->>+<<]>>>>>]  Move base to just before most significant digit
  <<                  Return to most significant digit

  [                   For each digit in number starting at the left (right on tape):
    [>+<-]            Move digit one cell to right (to tell where current digit is later)
    >>[-[<++++++++++>-]>+>]  Multiply each other digit by 10 and move left
    <[<<]>>           Return to base
    [-<<+>>>+<]       Copy base to just before digit (again) and just before next digit to right (left on tape)
    >>[               For each digit at least as significant as this digit:

      -[<-[>>+>>]>>[+[-<<+>>]  Compute "digit" divmod base
      >[-<]<[>]>++    While computing this: add quotient to next digit; initialize digit to "1" (0) first if "0" (null)
      >>>]<<<<<-]     End of divmod routine

      +>[-<+<+>>]     Leave modulo as current digit and restore base
      <<[->>+<<]      Move base to next position
      >>>
    ]

    <[-]<             Delete (now useless) copy of base
    [[-<+>]<<]<       Move digits back to original cells
  ]                   Repeat entire routine for each digit

  <[->>+<<]           Move base to original position
  <-                  Decrement iteration count
]

>>>>[>>]<<[>-[-----<+>]<----.<<]  Output by adding 47 to each cell containing a digit

숯 , 14 바이트

≔11ζＦＮ≔⍘ＩζＩηζζ

$t$$b$

≔11ζ

$x_0=11$

ＦＮ

$b$

≔⍘ＩζＩηζ

$x_i$

ζ

$x_t$

Pari / GP , 50 바이트

(b,n)->x=11;for(i=2,n,x=fromdigits(digits(x,b)));x

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

C (gcc) , 59 바이트

f(t,b){t=t?c(f(t-1,b),b):11;}c(n,b){n=n?c(n/b,b)*10+n%b:0;}

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

그루비 , 45 바이트

a,b,c=11->a--?f(a,b,a.toString(c as int,b)):c

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

@Arnauld의 답변

PHP , 83 75 바이트

function c($b,$t,$v=11){return $t==1?$v:c($b,$t-1,base_convert($v,10,$b));}

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

이것은 "작은"숫자로만 작동합니다 (예 : 테스트 사례 1 및 4는 아님).

Japt , 10 바이트

인덱스가 0입니다. 취하고 t, 첫번째 입력으로서 b상기 제있다.

_ìV ì}gBìC

시도 해봐

Gaia , 8 바이트

Bd
11@↑ₓ

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

0부터 iterations시작 base합니다.

Bd		| helper function: convert to Base b (implicit) then convert to base 10
		| main function:
11		| push 11
  @		| push # of iterations
   ↑ₓ		| do the above function (helper function) that many times as a monad

루비 , 39 바이트

인덱스가 0입니다.

->b,n,x=11{n.times{x=x.to_s(b).to_i};x}

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

펄 5 -Mbigint -pa , 65 바이트

$\=11;map{$p=$\;$\%=0+"@F";$\=($p%"@F").$\while$p/=0+"@F"}2..<>}{

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