Array erstellen und sortieren best practice RoundRobin Auswertung (gelöst) (Allgemeines zu Perl)

[thread]20175[/thread]

Array erstellen und sortieren best practice RoundRobin Auswertung [gelöst]

Tags: perl5 Array sortierung Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+9 replies
Ichhalt

2016-10-18 11:39
User since
2016-10-10
30 Artikel
BenutzerIn
Hallo miteinander - da bin ich wieder ...

ich zerbreche mir mal wieder den Kopf und komm nicht weiter - brauch mal wieder nen leichten Stubs auf den Hinterkopf zur Förderung meines Denkvermögens bitte:

ich lese Tabellen mit 5 Spalten und mehreren Zeilen in ein Array:
Format der Rohdaten:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14

+----+--------------------------+--------------------------+--------+--------+ | id | spieler1 | spieler2 | sperg1 | sperg2 | +----+--------------------------+--------------------------+--------+--------+ | 1 | HE2095: Nebojsa Müller | HE3258: Felix Riehl | 2 | 0 | | 2 | HE3271: Michael Sommer | HE2058: Alexander Wagner | 1 | 2 | | 3 | HE3258: Felix Riehl | HE2058: Alexander Wagner | 2 | 0 | | 4 | HE520: Oliver Zinkl | HE3271: Michael Sommer | 2 | 1 | | 5 | HE2095: Nebojsa Müller | HE2058: Alexander Wagner | 2 | 1 | | 6 | HE3258: Felix Riehl | HE520: Oliver Zinkl | 2 | 0 | | 7 | HE2095: Nebojsa Müller | HE3271: Michael Sommer | 2 | 0 | | 8 | HE2058: Alexander Wagner | HE520: Oliver Zinkl | 1 | 2 | | 9 | HE2095: Nebojsa Müller | HE520: Oliver Zinkl | 0 | 2 | | 10 | HE3271: Michael Sommer | HE3258: Felix Riehl | 0 | 2 | +----+--------------------------+--------------------------+--------+--------+
Ich denke ihr wisst damit schon was ich erfragen will ... Wie bekomme ich das sortiert, so dass ich bei den 5 Spielern dann eine Rangliste rausbekomme ...
Gedanklich scheitere ich daran, dass ja ein und derselbe Spieler mal Spieler 1 und mal Spieler 2 sein kann ... und damit das Ergebnis auch entsprechend genommen werden muss zur Berechnung des Ersten, Zweiten und Dritten ...
Im Endeffekt ist es die Auswertung eines RoundRobin Turniers um die Spieler zu bestimmen, die im Anschluss in die KO Runde gehen ...

Danke und LG
Ichhalt
- +7 replies
- Linuxer
 
 2016-10-18 12:19
 
 User since
 2006-01-27
 3890 Artikel
 HausmeisterIn
 
 Hi,
 
 Wie soll denn konkret sortiert werden?
 
 Die Daten liegen in einem Array? Wie genau? Ist das ein einfaches Array? Ist das ein Array of Array?
 
 sperg1/sperg2 heisst vermutlich "Spieler Ergebnis 1", bzw. "... 2" ?
 
 Sortierung dann nach Summe der Spielerergebnisse?
 
 Ansatz:
 
 Du könntest einen Hash aufbauen, als Schlüssel wird der Spielername aus den Spalten spieler1 bzw. spieler2 verwendet. Der Wert wird dann um das jeweilige Ergebnis erhöht.
 Danach könnte man die Schlüssel (Spielernamen) in der Reihenfolge der Werte (Summe der Spielergebnisse) ausgeben.
 meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
 Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
 - +6 replies
 - Ichhalt
 
 2016-10-18 12:37
 
 User since
 2016-10-10
 30 Artikel
 BenutzerIn
 
 Danke für den Hinweis - liegt vermutlich daran, dass ich schon wieder viel zu lange brauche dafür und dran rumbastel (auf MySQL Ebene) und n Brett vorm Kopf hab ...
 
 Nein - ich habe es eben auch noch nicht in ein Array gepackt, da ich eben auch da gedanklich nicht weiter komme im Moment ...
 Müßte halt zum einen die Spiele die gewonnen wurden zählen UND dann auch noch mitrechnen, wie das Ergebnis ist.
 Also 3 gewonnen, 1 verloren - 6:3 zum Beispiel ... zweimal 2:0, einmal 2:1 und einmal 0:2 verloren ....
 N Hash wäre ne Idee, wenn ich Dich da bitten könnte mir nen konkreten Ansatz yu liefern, weil ich mit Hashes echt auf Kriegsfuß stehe ... Ich weiß, ist viel verlangt, aber Du weißt ja wie das ist ... Zeitdruck und Hirn zu ...
 
 Danke und LG
 Ichhalt
 Last edited: 2016-10-18 12:41:26 +0200 (CEST)
 - +5 replies
 - Raubtier
 
 2016-10-18 14:24
 
 User since
 2012-05-04
 1075 Artikel
 BenutzerIn
 
 Es ist hilfreich die genauen Regeln zu kennen. Was passiert bei Gleichstand? Was bedeutet ein 2:1 - gibt es dann wie beim Fußball 3 Punkte für den Gewinner? Gibt es in deiner Sportart sowas wie Sonneborn-Berger- oder Buchholz-Wertung beim Schach? Ist ein RoundRobin-Turnier dasselbe wie ein Rundenturnier, wo jeder gegen jeden spielt (ich kannte den Begriff bislang nur aus der IT...)?
 Last edited: 2016-10-18 14:27:46 +0200 (CEST)
 - +4 replies
 - Ichhalt
 
 2016-10-18 14:34
 
 User since
 2016-10-10
 30 Artikel
 BenutzerIn
 
 Prinzipiell ist das je nach Turnier unterschiedlich - Im Moment einfach nur ein Zähler $gewonnen++ $verloren++ .... mit x:y Spielen
 
 Im Prinzip hab ich es hinbekommen ohne Hash
 
 Code: (dl )
 
 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
 
 print "Gruppe $paar\n"; $sql = "SELECT id FROM Gruppe".$gruppe.";"; $exe = $dbh->prepare($sql); $exe->execute() or die $!; while(@outer = $exe->fetchrow_array) { push (@id, $outer[0]); } $exe->finish; foreach $id (@id) { my $gewonnen = 0; my $verloren = 0; my $eigen = 0; my $gegen = 0; $innersql = "SELECT spieler1, sperg1, spieler2, sperg2, hdv FROM Gruppe$gruppe, Paarungen$gruppe WHERE Gruppe$gruppe.id = $id AND (hdv = spieler1 or hdv = spieler2);"; $exe = $dbh->prepare($innersql); $exe->execute() or die $! ."::$dbh->errstr: Name = $n Gruppe $gruppe $innersql"; while(@inner = $exe->fetchrow_array) { $s1 = latin1($inner[0]); $s2 = latin1($inner[2]); $n = latin1($inner[4]); if($n eq $s1) { $gewonnen++ if($inner[1] == 2); $verloren++ if($inner[3] == 2); $eigen = $eigen + $inner[1]; $gegen = $gegen + $inner[3]; } if($n eq $s2) { $gewonnen++ if($inner[3] == 2); $verloren++ if($inner[1] == 2); $eigen = $eigen + $inner[3]; $gegen = $gegen + $inner[1]; } } $exe->finish; print "$n: Gewonnen: $gewonnen Verloren: $verloren Legs: $eigen:$gegen \n"; }
 
 UPDATE:
 
 Code upgedated ... encoding ist die Hölle aber es läuft jetzt
 
 Vielen Dank für Euere Hilfe beim Nachdenken und die Anregungen
 LG
 Ichhalt
 Last edited: 2016-10-18 14:55:54 +0200 (CEST)
 
 +3 replies
 
 Ichhalt
 
 2016-10-18 14:59
 
 User since
 2016-10-10
 30 Artikel
 BenutzerIn
 
 RoundRobin heißt ja nix anderes, grundsätzlich, wie Jeder gegen Jeden.
 Das gibt es ja in vielen Wettbewerben.
 Hier ist es nur der Anfang um dann daraus abzuleiten, wer in die KO Runde kommt. Dort werden dann noch gesetzte Spieler hinzugelost und dann geht es weiter ...
 Für die, die es interessiert es handelt sich hier um Dart
 
 LG
 Ichhalt
 
 +2 replies
 
 Raubtier
 
 2016-10-18 15:31
 
 User since
 2012-05-04
 1075 Artikel
 BenutzerIn
 
 Hm.
 
 1. Ich hätte bei Dart erwartet, dass es in der Tabelle Felder wie "set" oder "leg" gibt statt "sperg".
 
 2. Ich lese deinen Code nur sehr ungern, denn wer weiß schon, was folgendes tut (insbesondere was sind 0,2,4)? (ja, ich weiß, finde man im select heraus)
 
 Code (perl): (dl )
 
 1 2 3
 
 $s1 = latin1($inner[0]); $s2 = latin1($inner[2]); $n = latin1($inner[4]);
 
 Ich würde da für das @inner lieber anständige Namen haben wollen!
 
 3. Tabellennamen mit variablem Anteil drin?!
 
 4. Auch wenn das $id in der SQL-Abfrage aus einer anderen Tabelle kommt, habe ich damit immer ein ungutes Gefühl, wenn man Variablen in die SQL-Abfrage direkt reinschreibt ohne Quoting. Da du eh prepare/execute nutzt, könntest du das $id einfach ins execute schieben.
 
 5. Was soll die magische Konstante "2" in $gewonnen++ if($inner[1] == 2);? Immer best of 3? Warum nicht einfach auf $inner[1] > $inner[3] testen?
 
 Ichhalt
 
 2016-10-18 16:19
 
 User since
 2016-10-10
 30 Artikel
 BenutzerIn
 
 2016-10-18T13:31:41 Raubtier
 Hm.
 
 1. Ich hätte bei Dart erwartet, dass es in der Tabelle Felder wie "set" oder "leg" gibt statt "sperg".
 
 Ja - stimmt und bin da bei Dir, aber ich fing da eigentlich aus Neugierde damit an und dann wuchs es mal wieder ... der ganze Code muss noch massiv überarbeitet werden und optimiert werden
 
 2016-10-18T13:31:41 Raubtier
 2. Ich lese deinen Code nur sehr ungern, denn wer weiß schon, was folgendes tut (insbesondere was sind 0,2,4)? (ja, ich weiß, finde man im select heraus)
 
 Code (perl): (dl )
 
 1 2 3
 
 $s1 = latin1($inner[0]); $s2 = latin1($inner[2]); $n = latin1($inner[4]);
 
 Ich würde da für das @inner lieber anständige Namen haben wollen!
 
 Siehe oben - wird alles noch überarbeitet...
 
 2016-10-18T13:31:41 Raubtier
 3. Tabellennamen mit variablem Anteil drin?!
 
 Es geht hier um je nach Teilnehmeranzahl um je Gruppe eine Tabelle Gruppe und eine dazu passende Paarungen
 
 2016-10-18T13:31:41 Raubtier
 4. Auch wenn das $id in der SQL-Abfrage aus einer anderen Tabelle kommt, habe ich damit immer ein ungutes Gefühl, wenn man Variablen in die SQL-Abfrage direkt reinschreibt ohne Quoting. Da du eh prepare/execute nutzt, könntest du das $id einfach ins execute schieben.
 
 hmmmm - ok ... ist mir aber dann explodiert
 
 2016-10-18T13:31:41 Raubtier
 5. Was soll die magische Konstante "2" in $gewonnen++ if($inner[1] == 2);? Immer best of 3? Warum nicht einfach auf $inner[1] > $inner[3] testen?
 
 Das hast Du richtig interpretiert und auch das wird noch variable werden.
 Was ich natürlich hier nicht aufgeführt habe, sind alle Turnierparameter, die beim Start angegeben werden können.
 Allerdings ist es auch auf Verbandsebene so, dass RoundRobin Best of 3 gespielt wird ... Plausibilitätsprüfung muss da eh auch noch rein...
 Ich brauch grade erst mal was vorzeigbares und dann wird detailiert nachgearbeitet ... wie gesagt - alles ein wenig mit der heißen Nadel gestrickt im Moment ...
 
 Aber ich danke Dir sehr für Deine Gedanken und sei Dir versichert, dass ich aus Deinen Zeilen wieder einiges mitgenommen hab. - Danke!
 
 LG
 Ichhalt
- Crian
 
 2016-10-19 10:37
 User since
 2003-08-04
 5867 Artikel
 ModeratorIn
 2016-10-18T09:39:31 Ichhalt
 
 Code: (dl )
 
 1 2 3 4 5 6 7 8 9 10 11 12 13 14
 
 +----+--------------------------+--------------------------+--------+--------+ | id | spieler1 | spieler2 | sperg1 | sperg2 | +----+--------------------------+--------------------------+--------+--------+ | 1 | HE2095: Nebojsa Müller | HE3258: Felix Riehl | 2 | 0 | | 2 | HE3271: Michael Sommer | HE2058: Alexander Wagner | 1 | 2 | | 3 | HE3258: Felix Riehl | HE2058: Alexander Wagner | 2 | 0 | | 4 | HE520: Oliver Zinkl | HE3271: Michael Sommer | 2 | 1 | | 5 | HE2095: Nebojsa Müller | HE2058: Alexander Wagner | 2 | 1 | | 6 | HE3258: Felix Riehl | HE520: Oliver Zinkl | 2 | 0 | | 7 | HE2095: Nebojsa Müller | HE3271: Michael Sommer | 2 | 0 | | 8 | HE2058: Alexander Wagner | HE520: Oliver Zinkl | 1 | 2 | | 9 | HE2095: Nebojsa Müller | HE520: Oliver Zinkl | 0 | 2 | | 10 | HE3271: Michael Sommer | HE3258: Felix Riehl | 0 | 2 | +----+--------------------------+--------------------------+--------+--------+
 
 Ich denke ihr wisst damit schon was ich erfragen will ... Wie bekomme ich das sortiert, so dass ich bei den 5 Spielern dann eine Rangliste rausbekomme ...
 Gedanklich scheitere ich daran, dass ja ein und derselbe Spieler mal Spieler 1 und mal Spieler 2 sein kann ... und damit das Ergebnis auch entsprechend genommen werden muss zur Berechnung des Ersten, Zweiten und Dritten ...
 
 Ich habe nun nicht alle antworten gelesen, insofern hoffe ich, nichts zu erzählen, was schon genannt wurde.
 
 In so einem Fall deutet das gedankliche Scheitern darauf hin, dass das Datenbankmodell nicht optimal ist.
 
 Dann kann es Sinn machen, das ganze so umzumodelieren, dass die Fragestellung völlig selbstverständlich gelöst wird.
 
 Du willst vielleicht aber auch genau diese Tabelle "behalten". Aber muss es eine Tabelle sein? Du könntest diesen suboptimal vorgehaltenen Inhalt immer noch als View auf einer Datenbank in Normalform nachbilden, wenn du ihn denn wirklich so brauchst.
 s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
 
 use strict; use warnings; Link zu meiner Perlseite

View all threads created 2016-10-18 11:39.