Tantangan

Diberikan basis dan indeks , istilah output , didefinisikan sebagai berikut:$1 < b < 10$$t \ge 1$$x_t$

• $x_1 = 11_{10}$
• $x_{i+1}$ diperoleh dengan mengonversi ke basis dan kemudian menafsirkan kembali digit-digitnya di basis$x_i$$b$$10$
• Keluaran harus dalam basis$10$

Berjalan melalui untuk basis 5, istilah 5 adalah:

• $x_1 = 11_{10}$ .
• $11_{10} = 21_{5}$ jadi .$x_2 = 21_{10}$
• $21_{10} = 41_{5}$ jadi .$x_3 = 41_{10}$
• $41_{10} = 131_{5}$ jadi .$x_4 = 131_{10}$
• $131_{10} = 1011_{5}$ jadi .$x_5 = 1011_{10}$
• Kami mengeluarkan string "1011"atau integer 1011.

Uji Kasus

Catatan: ini satu diindeks

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

Catatan

• Tidak ada celah standar
• Metode I / O standar apa pun diperbolehkan
• Anda dapat menggunakan indeks yang berbeda (seperti 0-diindeks, 1-diindeks, 2-diindeks, dll) untuk$t$
• Anda dapat menghasilkan istilah pertama .$t$
• Karena ini adalah kode-golf , kode terpendek menang untuk bahasa itu

JavaScript (Node.js) , 40 byte

Terima kasih kepada @Neil untuk menyimpan 5 byte pada versi ini dan 2 byte pada versi BigInt

Mengambil input sebagai (t)(base), di mana adalah 1-diindeks.$t$

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

Cobalah online!

JavaScript (Node.js) , 48 byte (versi BigInt)

Mengambil input sebagai (t)(base), di mana adalah 1-diindeks. Mengembalikan BigInt.$t$

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

Cobalah online!

05AB1E , 5 byte

>IF¹B

Cobalah online!

Penjelasan

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

Perhatikan bahwa tidak perlu memulai urutan secara eksplisit di 11 .
Mulai dari base+1dan melakukan iterasi tambahan akan menghasilkan pemberian iterasi pertama 11 .

Japt , 9 byte

ÆB=sV n
B

Cobalah

(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

Bahasa Wolfram (Mathematica) , 46 byte

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

Cobalah online!

Panggil dengan f[base][t]. Diindeks 0.

Retina , 67 byte

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

Cobalah online! Mengambil input yang dipisahkan koma $t$ (diindeks 0) dan $b$ . Apakah semua kalkulasinya di unary jadi habis untuk jumlah besar. Penjelasan:

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

$x_0=11$$b$

"$+"{`

$t$

^\d+
*

$x_i$

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

$b$

,_+

$b$

Python 2 , 71 byte

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

Cobalah online!

Diindeks 0.

Clojure , 109 byte

Kredit ke MilkyWay90 untuk menghapus 10 byte dengan melihat spasi yang tidak perlu Kredit ke Perwujudan Ketidaktahuan untuk byte lain dari ruang lain yang tidak perlu

Golf

(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)))))))

Tidak disatukan

(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)))))))

Saya pikir byte tempat utama bisa diselamatkan adalah ekspresi untuk ... reradixing? apa pun namanya. Secara khusus:

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

Perl 6 , 28 byte

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

Cobalah online!

Indeks ke dalam urutan berbasiskan nol.

Jelly , 8 7 byte

‘b³Ḍ$⁴¡

Cobalah online!

$b$$t$$b + 1$

Penjelasan

‘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 byte

{y(10/x\)/11}

Cobalah online!

Pyth , 8 byte

uijGQTEh

Cobalah online!

C # (Visual C # Interactive Compiler) , 87 byte

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;}

Disimpan 5 byte berkat @KevinCruijssen

Cobalah online!

brainfuck , 270 byte

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

Cobalah online!

Diindeks 0. Jumlah iterasi diasumsikan paling banyak 255.

Penjelasan

Rekaman itu ditata sebagai berikut:

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

Setiap digit sebenarnya disimpan sebagai digit itu ditambah 1, dengan 0 dicadangkan untuk "no more digit". Selama konversi basis, angka yang sedang dikerjakan dipindahkan satu sel ke kanan, dan basis dipindahkan ke kiri area kerja saat ini.

++<<++              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

Arang , 14 byte

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

$t$$b$

≔11ζ

$x_0=11$

ＦＮ

$b$

≔⍘ＩζＩηζ

$x_i$

ζ

$x_t$

Pari / GP , 50 byte

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

Cobalah online!

C (gcc) , 59 byte

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;}

Cobalah online!

Groovy , 45 byte

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

Cobalah online!

Jawaban Port @ Arnauld

PHP , 83 75 byte

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

Cobalah online!

Yang ini hanya akan bekerja dengan angka "kecil" (mis. Tidak menguji kasus 1 dan 4)

Japt , 10 byte

Diindeks 0. Dibawa tsebagai input pertama, bsebagai input kedua.

_ìV ì}gBìC

Cobalah

Gaia , 8 byte

Bd
11@↑ₓ

Cobalah online!

Membawa berbasis 0 iterationslalu 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

Ruby , 39 byte

Diindeks nol.

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

Cobalah online!

Perl 5 -Mbigint -pa , 65 byte

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

Cobalah online!