test_xls.rb in statsample-0.8.0

- old
+ new
@@ -1,42 +1,35 @@
-$:.unshift(File.dirname(__FILE__)+'/../lib/')
-require 'statsample'
-require 'test/unit'
-require 'tempfile'
-begin
-	require 'spreadsheet'
-rescue LoadError
-	puts "You should install spreadsheet (gem install spreadsheet)"
-end
-class StatsampleExcelTestCase < Test::Unit::TestCase
-    def setup
-        @ds=Statsample::Excel.read(File.dirname(__FILE__)+"/test_xls.xls")
-    end    
-    def test_read
-        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,nil,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)
-        
+require(File.dirname(__FILE__)+'/test_helpers.rb')
+
+class StatsampleExcelTestCase < MiniTest::Unit::TestCase
+  def setup
+    @ds=Statsample::Excel.read(File.dirname(__FILE__)+"/test_xls.xls")
+  end
+  def test_read
+    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,nil,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
+    tempfile=Tempfile.new("test_write.xls")
+    Statsample::Excel.write(@ds,tempfile.path)
+    ds2=Statsample::Excel.read(tempfile.path)
+    i=0
+    ds2.each_array do |row|
+      assert_equal(@ds.case_as_array(i),row)
+      i+=1
     end
-    def test_nil
-        assert_equal(nil,@ds['age'][5])
-    end
-    def test_write
-      tempfile=Tempfile.new("test_write.xls")
-        Statsample::Excel.write(@ds,tempfile.path)
-        ds2=Statsample::Excel.read(tempfile.path)
-        i=0
-        ds2.each_array{|row|
-            assert_equal(@ds.case_as_array(i),row)
-               i+=1
-        }
-    end
-end
\ No newline at end of file
+  end
+end