Added #sortByRowNames with tests.

Author: Joshua-Dias-Barreto

src/DataFrame-Tests/DataFrameTest.class.st

@@ -5157,6 +5157,29 @@ DataFrameTest >> testSortByAll [
 	self assert: actual equals: expected
 ]
 
+{ #category : #tests }
+DataFrameTest >> testSortByRowNames [
+
+	| dataFrame expected sortedDF |
+	dataFrame := DataFrame withRows:
+		             #( #( 'CD' 3 2 ) 
+							 #( 'AC' 1 4 ) 
+							 #( 'DB' 2 4 )
+		                #( 'BA' 5 1 ) ).
+	dataFrame rowNames: #( 'CD' 'AC' 'DB' 'BA' ).
+
+	expected := DataFrame withRows:
+		            #( #( 'AC' 1 4 ) 
+							#( 'BA' 5 1 ) 
+							#( 'CD' 3 2 )
+		               #( 'DB' 2 4 ) ).
+	expected rowNames: #( 'AC' 'BA' 'CD' 'DB' ).
+
+	sortedDF := dataFrame sortByRowNames.
+
+	self assert: sortedDF equals: expected
+]
+
 { #category : #tests }
 DataFrameTest >> testSortByRowNamesUsing [
 	"sorts by second letter of row name"

src/DataFrame/DataFrame.class.st

@@ -2469,6 +2469,13 @@ DataFrame >> sortByAll: arrayOfColumnNames [
 	^ self
 ]
 
+{ #category : #sorting }
+DataFrame >> sortByRowNames [
+	"Sorts the rows of the data frame based on the row names in ascending order"
+
+	self sortByRowNamesUsing: [ :a :b | a <= b ]
+]
+
 { #category : #sorting }
 DataFrame >> sortByRowNamesUsing: aBlock [
 	"Sorts the rows of the data frame based on the row names using the given comparison block"