Merge e0115e0

Author: olekscode

src/DataFrame/DataFrame.class.st

@@ -321,7 +321,7 @@ DataFrame >> addColumn: aDataSeries [
 { #category : #adding }
 DataFrame >> addColumn: aDataSeries atPosition: aNumber [
 	"Add DataSeries as a new column at the given position"
-	self addColumn: aDataSeries named: aDataSeries name atPosition: aNumber.
+	self addColumn: aDataSeries asArray named: aDataSeries name atPosition: aNumber.
 ]
 
 { #category : #adding }

src/DataFrame/DataSeries.class.st

@@ -115,7 +115,7 @@ DataSeries >> crossTabulateWith: aSeries [
 		(self uniqueValues collect: [ :each1 |
 			aSeries uniqueValues collect: [ :each2 |
 				(1 to: self size) inject: 0 into: [ :accum :i |
-					(((self at: i) = each1) and: ((aSeries at: i) = each2))
+					(((self atIndex: i) = each1) and: ((aSeries atIndex: i) = each2))
 						ifTrue: [ accum + 1 ]
 						ifFalse: [ accum ] ] ] ]).