17

Schreiben Sie eine Funktion f (n, k), die den k-dimensionalen Countdown von n anzeigt.

Ein 1-dimensionaler Countdown von 5 sieht aus wie

Ein 2-dimensionaler Countdown von 5 sieht so aus

Schließlich sieht ein dreidimensionaler Countdown von 5 aus

Formale Definition

Der eindimensionale Countdown von jedem n ist eine einzelne Zeile, in der die Ziffern n, n-1, ..., 1 verkettet sind (gefolgt von einer neuen Zeile).

Für jedes k ist der k-dimensionale Countdown von 1 die einzelne Zeile

Für n> 1 und k> 1 ist ein k-dimensionaler Countdown von n ein (k-1) -dimensionaler Countdown von n, gefolgt von einem k-dimensionalen Countdown von n-1.

Eingang

Zwei positive ganze Zahlen k und n <= 9 in einem beliebigen Format.

Ausgabe

Der k-dimensionale Countdown von n mit einer neuen Zeile nach jedem eindimensionalen Countdown. Zusätzliche Zeilenumbrüche sind in der Ausgabe zulässig.

Wertung

Standard Golf Scoring.

Bonus Beispiel

Hier ist ein Beispiel mit k> n, einem 4-dimensionalen Countdown von 3 (mit zusätzlichen Kommentaren, die in tatsächlichen Lösungen nicht enthalten sein sollen):

 -- 3-dimensional countdown from 3
 321
 21
 1
 21
 1
 1
 -- 4-dimensional countdown from 2:
 ---- 3-dimensional countdown from 2:
 21
 1
 1
 ---- 4-dimensional countdown from 1:
 1

Klarstellungen:

Ziffern in einer Zeile müssen nicht benachbart sein, aber sie müssen gleichmäßig verteilt sein.

Sie können ein vollständiges Programm schreiben, anstatt nur eine Funktion.

code-golf string

— Eric Tressler
quelle

Ich bin nicht sicher, ob ich die Testfälle richtig verstehe. Sind die 3D- und 4D-Countdowns von 2 identisch?

— Dennis

1

@ Tennis Ich denke, die Absicht ist, dass 4D Countdown von 2 = 3D Countdown von 2 + 4D Countdown von 1

— Sp3000

sollte es nicht 3d countdown von einem sagen?

— Destructible Lemon

Zusätzliche Zeilenumbrüche sind in der Ausgabe zulässig. Heißt das Bezug zu nehmen Hinterzeilenumbrüche oder sie können überall auftreten?

— Dennis

@ Tennis Zusätzliche Zeilenumbrüche können überall auftreten. Nun, 543 \ n21 ist nicht in Ordnung, aber nach einer "1" sind sie in Ordnung.

— Eric Tressler

15

Python, 60 Bytes

f=lambda n,k:n>1<k and f(n,k-1)+f(n-1,k)or'987654321\n'[~n:]

Teste es auf Ideone .

Wie es funktioniert

Der k- dimensionale Countdown von n kann mit einem einzigen Basisfall definiert werden:

Wenn n = 1 oder k = 1 ist , ist die Ausgabe n || n-1 || ... || 1 || ¶ , wo || zeigt Verkettung an.

Gibt unter Verwendung der rekursiven Definition aus der Frage f(n,k)zurück, f(n,k-1)+f(n-1,k)wenn n> 1 und k> 1 sind ; Andernfalls werden die letzten n + 1 Zeichen von zurückgegeben '987654321\n'.

— Dennis
quelle

Dennis ist einfach zu gut. Wie hast du das gemacht?

— Clismique

Meine einzige Erkenntnis hier war, dass Sie beide Basisfälle kombinieren können. Der Rest ist nur eine direkte Übersetzung der rekursiven Definition.

— Dennis

8

Gelee , 8 Bytes

R¡UḌFṚp⁷

Dies ist ein vollständiges Programm, das n und k als Befehlszeilenargumente erwartet .

Probieren Sie es online!

Wie es funktioniert

R¡UḌFṚp⁷  Main link. Left argument: n. Right argument: k

 ¡        Repeat the link to the left k times.
R           Range; map each integer j in the previous return value to [1, ..., j].
  U       Upend; reverse each 1-dimensional array in the result.
   Ḍ      Undecimal; convert each 1-dimensional array from base 10 to integer.
    F     Flatten the resulting array.
     Ṛ    Reverse the result.
      p⁷  Cartesian product with '\n'. (Join is weird for singleton arrays.)

— Dennis
quelle

Funktioniert nicht Yanstelle von p⁷?

— Meilen

Art von. Für 5, 1wird angezeigt [54321].

— Dennis

5

Javascript, 40 38 37 Bytes

Dank @ edc65 1 Byte gespart:

f=(n,k)=>k*n?f(n,k-1)+f(n-1,k):n||`
`

Vorherige Antworten

38 Bytes dank @Neil:

f=(n,k)=>k&&n?f(n,k-1)+f(n-1,k):n||`
`

40 Bytes:

f=(n,k)=>k&&n?f(n,k-1)+f(n-1,k):n?n:'\n'

— Hedi
quelle

1

Speichern Sie ein Byte, indem Sie ||anstelle von verwenden ?n:. Speichern Sie ein weiteres Byte, indem Sie eine wörtliche Newline in `s anstelle von verwenden '\n'.

— Neil

Das Beste, was ich ohne die zusätzlichen Zeilenumbrüche machen konnte, war 43:f=(n,k)=>n?(k?f(n,k-1):n)+f(n-1,k):k?``:`\n`

— Neil,

@Neil Ich verwende Editor ++, um Bytes zu zählen, und die wörtliche Newline zählt als 2 Zeichen.

— Hedi

Vielleicht könntest du es stattdessen in deinem Browser-Notizblock versuchen?

— Neil

1

Clever, +1. Verwenden Sie *stattdessen &&.

— EDC65

3

Python, 76 75 Bytes

-1 Byte dank @ Sp3000

c=lambda n,k:k>1and'\n'.join(c(n-i,k-1)for i in range(n))or'987654321'[-n:]

Caries aus dem Verfahren , wie im OP beschrieben schließt sich die abnehmenden nErgebnisse für k-1auf newlines mit einer Base der Rekursion der 'n...1'Zeichenfolge , wenn kist 1( knicht mehr als 1da wir positiven garantiert kEingang).

Testfälle auf ideone

— Jonathan Allan
quelle

3

Python, 86 81 80 Bytes

o=lambda d,n:"987654321"[-n:]if d<2else"\n".join([o(d-1,n-x) for x in range(n)])

dist die Anzahl der Dimensionen, nist die Countdown-Nummer.

Werde bald eine Erklärung posten.

EDIT # 1: Es wurde in Lambda geändert.

EDIT # 2: 1 Byte dank @DestructibleWatermelon gespeichert.

— Clismique
quelle

3

Haskell, 57 Bytes

n#1='\n':(show=<<[n,n-1..1])
1#_=1#1
n#k=n#(k-1)++(n-1)#k

Anwendungsbeispiel: 5 # 3-> "\n54321\n4321\n321\n21\n1\n4321\n321\n21\n1\n321\n21\n1\n21\n1\n1".

Eine direkte Umsetzung der Definition.

— nimi
quelle

2

Schläger 215 Bytes

(define(g n k(s(number->string n)))(cond [(< k 2) n]
[else(define o(for/list((i(string-length s)))
(string->number(substring s i))))(for/list((x o))(g x(- k 1)))])) 
(define(f n k)(for-each println(flatten(g n k))))

Testen:

(f 54321 3)

54321
4321
321
21
1
4321
321
21
1
321
21
1
21
1
1

— rnso
quelle

Umm ... Warum 54321erscheint es im 3D-Modus zweimal?

— Erik der Outgolfer

Ich versuche die Probleme zu lösen.

— Rnso

@ EʀɪᴋᴛʜᴇGᴏʟғᴇʀ Das Problem wurde behoben.

— RNSO

Cool, und ich sehe auch, dass du viel Leerzeichen entfernt hast!

— Erik der Outgolfer

In Racket ist die Verwendung von Lambda ( λ) immer weniger Bytes als die Verwendung von define. Außerdem wurde als Eingabe für neine Zahl angegeben, für die Sie die erstellen (range 1 n). Siehe auch über das Ersetzen von conddurch if, da Sie Bytes auf dem Computer speichern else.

— Steven H.

2

J, 38 37 32 Bytes

a:":@>@-.~&,0<@-."1~0&(](-i.)"0)

Dies ist eine Funktion, die k auf dem LHS und übernimmt n auf der rechten Seite .

5 Bytes mit Ideen von @ Adám gespeichert.

Verwendung

   f =: a:":@>@-.~&,0<@-."1~0&(](-i.)"0)
   3 f 5
5 4 3 2 1
4 3 2 1  
3 2 1    
2 1      
1        
4 3 2 1  
3 2 1    
2 1      
1        
3 2 1    
2 1      
1        
2 1      
1        
1

Erläuterung

a:":@>@-.~&,0<@-."1~0&(](-i.)"0)  Input: k on LHS, n on RHS
                    0&(        )  Repeat k times on initial value n
                        (   )"0   For each value x
                          i.        Make the range [0, x)
                         -          Subtract x from each to make the range [x, 1]
                       ]            Return the array of ranges
            0  -."1~              Remove the zeros from each row
             <@                   Box each row
          &,                      Flatten the array of boxes
a:     -.~                        Remove the empty boxes
     >@                           Unbox each
  ":@                             Convert it into a string and return

— Meilen
quelle

Sie sollten in der Lage sein, meinen Ansatz zu verwenden .

— Adám

@ Adám Danke, ich werde es ausprobieren

— Meilen

2

Dyalog APL , 18 Bytes

Fordert zur Eingabe von n und dann von k auf .

~∘'0'⍤1⍕(⌽⍳)⍤0⍣⎕⊢⎕

~∘'0'⍤1entferne ( ~) die ( ∘) Nullen ( '0') aus den Zeilen (⍤1 ) (nach Bedarf mit Leerzeichen auffüllen) von

⍕ die Charakterdarstellung von

(⌽⍳)⍤0⍣⎕Die umgekehrten ( ⌽) zählen bis ( ⍳) jedes skalaren ( ⍤0), wiederholten ( ⍣) Eingabe ( ⎕) Male

⊢ auf

⎕ numerische Eingabe

TryAPL online!

— Adam
quelle

2

C 93 Bytes

Iterative Implementierung.

m,i,j;f(n,k){for(;m<k+2;m++)for(j=0;j<n;j++){for(i=m;i<n-j;i++)printf("%d",n-j-i);puts("");}}

C 67 65 61 56 52 Bytes

Rekursive Implementierung

f(n,k){n*k?f(n,k-1)+f(n-1,k):puts("987654321"+9-n);}

— Cleblanc
quelle

Sie können keine Zeichenfolgen deklarieren, ohne char * zu verwenden, sodass Ihre rekursive Implementierung nicht kompiliert wird. Aber die Lösung ist sehr einfach und spart 4 Bytes: Ersetzen Sie einfach minnerhalb des puts()Anrufs mit "987654321".

— G. Sliepen

Ich habe mit gcc (GCC) 3.4.4 kompiliert (cygming special, gdc 0.12, mit dmd 0.125). Ich denke, es ist in Ordnung, da ich nur von char * nach int konvertiere, aber da Ihre Lösung 4 Bytes kleiner ist, gefällt es mir besser. Danke

— Cleblanc

1

Batch, 117 Bytes

@setlocal
@set/an=%1-1,k=%2-1,p=n*k,s=987654321
@if %p%==0 (call echo %%s:~-%1%%)else call %0 %1 %k%&call %0 %n% %2

Port of Dennis ♦ 's Python-Antwort.

— Neil
quelle

1

Ruby, 56 Bytes

f=->n,k{n>1&&k>1?[f[n,k-1],f[n-1,k]]:[*1..n].reverse*""}

Verwendung

Wenn Sie Lösungen anzeigen, sollten Sie "Kernel # puts" verwenden.

Beispiel:

puts f[9,3]

— cia_rana
quelle

Dimensions-Countdown

Formale Definition

Eingang

Ausgabe

Wertung

Bonus Beispiel

Python, 60 Bytes

Wie es funktioniert

Gelee , 8 Bytes

Wie es funktioniert

Javascript, 40 38 37 Bytes

Python, 76 75 Bytes

Python, 86 81 80 Bytes

Haskell, 57 Bytes

Schläger 215 Bytes

J, 38 37 32 Bytes

Verwendung

Erläuterung

Dyalog APL , 18 Bytes

C 93 Bytes

C 67 65 61 56 52 Bytes

Batch, 117 Bytes

Ruby, 56 Bytes

Verwendung