test/test_csv.rb in statsample-0.3.2 vs test/test_csv.rb in statsample-0.3.3

@@ -1,16 +1,29 @@
-require File.dirname(__FILE__)+'/../lib/statsample'
+$:.unshift(File.dirname(__FILE__)+'/../lib/')
+require 'statsample'
 	require 'tmpdir'
 require 'test/unit'
 
 class StatsampleCSVTestCase < Test::Unit::TestCase
 	def initialize(*args)
         @ds=Statsample::CSV.read(File.dirname(__FILE__)+"/test_csv.csv")
 		super
 	end
     def test_read
-        assert_equal(6,@ds.cases)
+                assert_equal(6,@ds.cases)
         assert_equal(%w{id name age city a1},@ds.fields)
+        id=[1,2,3,4,5,6].to_vector(:scale)
+        name=["Alex","Claude","Peter","Franz","George","Fernand"].to_vector(:nominal)
+        age=[20,23,25,27,5.5,nil].to_vector(:scale)
+        city=["New York","London","London","Paris","Tome",nil].to_vector(:nominal)
+        a1=["a,b","b,c","a",nil,"a,b,c",nil].to_vector(:nominal)
+        ds_exp=Statsample::Dataset.new({'id'=>id,'name'=>name,'age'=>age,'city'=>city,'a1'=>a1}, %w{id name age city a1})
+        ds_exp.fields.each{|f|
+            assert_equal(ds_exp[f],@ds[f])
+        }
+        assert_equal(ds_exp,@ds)
+        
+
     end
     def test_nil
         assert_equal(nil,@ds['age'][5])
     end
     def test_write
\ No newline at end of file