| Baum :: binär :: Suche Baum :: binär :: Suche ist ein binärer Suchbaum für Perl. |
Jetzt downloaden |
Baum :: binär :: Suche Ranking & Zusammenfassung
- Lizenz:
- Perl Artistic License
- Name des Herausgebers:
- Stevan Little
- Website des Verlags:
- http://search.cpan.org/~stevan/
Baum :: binär :: Suche Stichworte
Baum :: binär :: Suche Beschreibung
Baum :: binär :: Suche ist ein binärer Suchbaum für Perl. Tree :: Binary :: Suche ist ein binärer Suchbaum für Perl.synopsis Verwenden von Tree :: Binäry :: Suche; MEIN $ BTREE = TREE :: Binary :: Suche-> Neue (); $ btree-> usenumericcomparison (); $ btree-> einsatz (5 => "fünf"); $ btree-> einsatz (2 => "zwei"); $ btree-> einsatz (1 => "eins"); $ btree-> einsatz (3 => "drei"); $ btree-> einsatz (4 => "vier"); $ btree-> einsatz (9 => "neun"); $ btree-> einsatz (8 => "acht"); $ btree-> einsatz (6 => "sechs"); $ btree-> einsatz (7 => "sieben"); # Dies erstellt den folgenden Baum: # # + ------- (5) ---------- + # | | # + - (2) - + + - (9) # | | | # (1) (3) - + + ---- (8) # | | # (4) (6) - + # | # (7) # $ btree-> existiert (7); # Return True $ Bree-> Update (7 => "sieben (aktualisiert)"); $ btree-> auswählen (9); # wiedergeben 'neun' $ btree-> min_key (); # kehrt 1 $ btree-> min () zurück; # gibt ein '$ btree-> max_key () zurück; # Rückgabe 9 $ btree-> max (); # Rückkehr 'neun' $ btree-> löschen (5); # Dies führt zu folgendem Baum: # # + ------- (6) ------- + # | | # + - (2) - + + - (9) # | | | # (1) (3) - + + - (8) # | | # (4) (7) #Dieses Modul implementiert einen binären Suchbaum, der eine spezialisierte Verwendung eines Binärbaums ist. Das Grundprinzip ist, dass alle Elemente links weniger als die Wurzel sind, alle Elemente rechts sind größer als die Wurzel. Dies reduziert die Suchzeit für Elemente im Baum, indem die Anzahl der Knoten, die jedes Mal gesucht werden müssen, wenn ein Knoten untersucht werden muss. Über sie Ich habe jedoch entschieden, das Tree-Traversal in diesem Modul zu implementieren, ohne rekursive Unterprogramme zu verwenden. Dies ist teilweise eine Leistungsstreuung, auch wenn Perl theoretisch unbegrenzte Rekursion bewältigen kann, subroutine Anrufe, um etwas Overhead zu haben. Mein Algorithmus ist immer noch rekursiv, ich habe gerade ausgewählt, es in einem einzigen Subroutin zu behalten. Aquirements: · Perl
Baum :: binär :: Suche Zugehörige Software