Herausforderung

Ausgehend von einer Basis und einem Index wird der Ausgabeterm wie folgt definiert:$1 < b < 10$$t \ge 1$$x_t$

• $x_1 = 11_{10}$
• $x_{i+1}$ x i b 10 wird erhalten, indem zur Basis konvertiert und dann seine Ziffern in der Basis neu interpretiert werden$x_i$$b$$10$
• Die Ausgabe sollte in Basis$10$

Ein Spaziergang durch Basis 5, Term 5, wäre:

• $x_1 = 11_{10}$ .
• $11_{10} = 21_{5}$ × 2 = 21 10 also .$x_2 = 21_{10}$
• $21_{10} = 41_{5}$ × 3 = 41 10 also .$x_3 = 41_{10}$
• $41_{10} = 131_{5}$ also .$x_4 = 131_{10}$
• $131_{10} = 1011_{5}$ also .$x_5 = 1011_{10}$
• Wir geben den String "1011"oder die ganze Zahl aus 1011.

Testfälle

Hinweis: Dies sind indizierte

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

Anmerkungen

• Standardlücken sind nicht erlaubt
• Jede Standard-E / A-Methode ist zulässig
• Sie können verschiedene Indizes (z. B. 0-indexiert, 1-indexiert, 2-indexiert usw.) für$t$
• Sie können die ersten Terme ausgeben .$t$
• Da dies Codegolf ist , gewinnt der kürzeste Code für diese Sprache

JavaScript (Node.js) , 40 Byte

Vielen Dank an @Neil für das Speichern von 5 Bytes in dieser Version und 2 Bytes in der BigInt-Version

Nimmt die Eingabe als an (t)(base), wobei $t$ 1-indiziert ist.

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

Probieren Sie es online!

JavaScript (Node.js) , 48 Byte (BigInt-Version)

Nimmt die Eingabe als an (t)(base), wobei $t$ 1-indiziert ist. Gibt ein BigInt zurück.

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

Probieren Sie es online!

05AB1E , 5 Bytes

>IF¹B

Probieren Sie es online!

Erläuterung

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

Beachten Sie, dass die Sequenz nicht explizit bei 11 beginnen muss .
Wenn Sie mit base+1einer zusätzlichen Iteration beginnen, wird die erste Iteration 11 ergeben .

Japt , 9 Bytes

ÆB=sV n
B

Versuch es

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

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

Probieren Sie es online!

Mit anrufen f[base][t]. 0-indiziert.

Retina , 67 Bytes

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

Probieren Sie es online! Übernimmt kommagetrennte Eingaben $t$ (0-indiziert) und $b$ . Wenn alle Berechnungen unärgerlich sind, ist die Zeit für große Zahlen abgelaufen. Erläuterung:

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

Initialisiere $x_0=11$ und wandle $b$ in unär um.

"$+"{`

Wiederholen Sie $t$ mal.

^\d+
*

Wandle $x_i$ in unär um.

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

In Basis konvertieren $b$ .

,_+

Löschen Sie $b$ aus der Ausgabe.

Python 2 , 71 Bytes

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

Probieren Sie es online!

0-indiziert.

Clojure , 109 Bytes

Dank an MilkyWay90 für das Entfernen von 10 Bytes durch Auffinden unnötiger Leerzeichen. Dank an Ausführungsform der Ignoranz für ein anderes Byte aus einem anderen unnötigen Leerzeichen

Golf gespielt

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

Ungolfed

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

Ich denke, dass die Hauptplatzbytes gespeichert werden könnten, ist der Ausdruck für ... erneutes Mischen? wie auch immer das heißen würde. Speziell:

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

Perl 6 , 28 Bytes

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

Probieren Sie es online!

Der Index in der Sequenz basiert auf Null.

Gelee , 8 7 Bytes

‘b³Ḍ$⁴¡

Probieren Sie es online!

$b$$t$$b + 1$

Erläuterung

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

{y(10/x\)/11}

Probieren Sie es online!

Pyth , 8 Bytes

uijGQTEh

Probieren Sie es 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;}

5 Bytes gespart dank @KevinCruijssen

Probieren Sie es online!

Brainfuck , 270 Bytes

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

Probieren Sie es online!

0-indiziert. Es wird angenommen, dass die Anzahl der Iterationen höchstens 255 beträgt.

Erläuterung

Das Band ist wie folgt aufgebaut:

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

Jede Ziffer wird tatsächlich als diese Ziffer plus 1 gespeichert, wobei 0 für "keine weiteren Ziffern" reserviert ist. Während der Basiskonvertierung werden die aktuell bearbeiteten Ziffern um eine Zelle nach rechts und die Basis links vom aktuellen Arbeitsbereich verschoben.

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

Holzkohle , 14 Bytes

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

$t$$b$

≔11ζ

$x_0=11$

ＦＮ

$b$

≔⍘ＩζＩηζ

$x_i$

ζ

$x_t$

Pari / GP , 50 Bytes

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

Probieren Sie es online!

C (gcc) , 59 Bytes

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

Probieren Sie es online!

Groovy , 45 Bytes

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

Probieren Sie es online!

Port of @ Arnauld's Antwort

PHP , 83 75 Bytes

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

Probieren Sie es online!

Dieser funktioniert nur mit "kleinen" Zahlen (zB nicht mit Testfällen 1 und 4)

Japt , 10 Bytes

0-indiziert. Nimmt tals erste Eingabe, bals zweite.

_ìV ì}gBìC

Versuch es

Gaia , 8 Bytes

Bd
11@↑ₓ

Probieren Sie es online!

Nimmt 0-basiert iterationsdann 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 Bytes

Nullindexiert.

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

Probieren Sie es online!

Perl 5 -Mbigint -pa , 65 Bytes

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

Probieren Sie es online!