darkext 0.12.0

data/spec/beagle_spec.rb

@@ -0,0 +1,42 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Beagle do
+  it 'should respond to all the methods' do
+    Beagle.should respond_to(*%w(home home= start stop status query running?))
+  end
+
+  it 'should not work if Beagle.home is nil' do
+    Beagle.home = nil
+    lambda { Beagle.start }.should raise_error
+  end
+
+  it 'should return a true or false value from running' do
+    # TODO: use temp dir
+    Beagle.home = '/balls'
+    Beagle.running?.is_boolean?.should be_true
+  end
+
+  it 'should probably not be running for a random directory' do
+    # TODO: use temp dir
+    Beagle.home = '/balls'
+    Beagle.running?.should be_false
+  end
+
+  it 'should return a String for the status' do
+    # TODO: use temp dir
+    Beagle.home = '/balls'
+    Beagle.status.should be_a_kind_of(String)
+  end
+
+  it 'should return a true or false value from start' do
+    # TODO: use temp dir
+    Beagle.home = '/usr'
+    Beagle.start.is_boolean?.should be_true
+  end
+
+  it 'should return a true or false value from stop' do
+    # TODO: use temp dir
+    Beagle.home = '/usr'
+    Beagle.stop.is_boolean?.should be_true
+  end
+end

data/spec/boolean_spec.rb

@@ -0,0 +1,53 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Object do
+  it 'should respond to the new method' do
+    Object.new.should respond_to(*%w(is_boolean?))
+  end
+
+  it 'should return a boolean from is_boolean' do
+    true.is_boolean?.is_boolean?.should be_true
+  end
+
+  it 'should be randomly booolean' do
+    1.is_boolean?.should be_false
+    'true'.is_boolean?.should be_false
+    :true.is_boolean?.should be_false
+  end
+end
+
+describe TrueClass do
+  it 'should respond to the new method' do
+    true.should respond_to(*%w(intern))
+  end
+
+  it 'should return a symbol from intern' do
+    true.intern.should be_a_kind_of(Symbol)
+  end
+
+  it 'should be boolean' do
+    true.is_boolean?.should be_true
+  end
+
+  it 'should intern properly' do
+    true.intern.should == :true
+  end
+end
+
+describe FalseClass do
+  it 'should respond to the new method' do
+    false.should respond_to(*%w(intern))
+  end
+
+  it 'should return a symbol from intern' do
+    false.intern.should be_a_kind_of(Symbol)
+  end
+
+  it 'should be boolean' do
+    false.is_boolean?.should be_true
+  end
+
+  it 'should intern properly' do
+    false.intern.should == :false
+  end
+end

data/spec/fiber_spec.rb

@@ -0,0 +1,35 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Fiber do
+  before(:each) do
+    @fiber = Fiber.new do
+      (1..10).each { |i| Fiber.yield(i) }
+    end
+  end
+
+  it 'should respond to all the class methods' do
+    Fiber.should respond_to(*%w(yield current))
+  end
+
+  it 'should respond to all the instance methods' do
+    @fiber.should respond_to(*%w(resume yield))
+  end
+
+  it 'should raise an error when it is done' do
+    lambda { 100.times { @fiber.resume } }.should raise_error
+  end
+
+  it 'should return a string from inspect' do
+    @fiber.inspect.should be_a_kind_of(String)
+  end
+
+  it 'should inspect properly' do
+    @fiber.inspect.should match(/.*Fiber:0x/)
+  end
+
+  it 'should, um, work' do
+    a = Array.new
+    10.times { a << @fiber.resume }
+    a.should == (1..10).to_a
+  end
+end

data/spec/float_spec.rb

@@ -0,0 +1,18 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Float do
+  it 'should respond to the new methods' do
+    1.0.should respond_to(*%w(equals?))
+  end
+
+  it 'should return a boolean from equals?' do
+    1.0.equals?(1.0000001).is_boolean?.should be_true
+  end
+
+  it 'should properly equals' do
+    1.00000000000000001.equals?(1.00000000000000002).should be_true
+    1.1.equals?(1.2).should be_false
+    1.1.equals?(1.2,0.1).should be_true
+    1.2.equals?(1.1,0.1).should be_true
+  end
+end

data/spec/hash_spec.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Hash do
+  before(:each) do
+    @h = { :foo => 1, :bar => 2, :baz => 3 }
+    @nh = { :foo => { :bar => 2 }, :baz => { :biz => 4 } }
+  end
+
+  it 'should respond to all the new methods' do
+    Hash.new.should respond_to(*%w(nested_find deep_merge!))
+  end
+
+  it 'should deep merge' do
+    a = { :foo => 1, :bar => { :baz => 10, :biz => { :hello => :world }}}
+    b = { :pickles => true, :sandwich => { :ham => 2, :bread => { :grains => :whole }}}
+    result = { :foo => 1, :pickles => true, :sandwich => { :ham => 2, :bread => { :grains => :whole }}, :bar => { :baz => 10, :biz => { :hello => :world }}}
+    a.deep_merge!(b)
+    a.should == result
+  end
+
+  it 'should find nested things' do
+    @nh.nested_find(:baz,:biz).should == 4
+    @nh.nested_find(:foo,:bar).should == 2
+    @nh.nested_find(:foo,:biz).should be_nil
+  end
+end

data/spec/integer_spec.rb

@@ -0,0 +1,22 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Integer do
+  it 'should respond to the new methods' do
+    10.should respond_to(*%w(fact))
+  end
+
+  it 'should not calculate the factorial of negative numbers' do
+    lambda { -10.fact }.should raise_error
+  end
+
+  it 'should return an Integer from factorial' do
+    10.fact.should be_a_kind_of(Integer)
+  end
+
+  it 'should factorial properly' do
+    5.fact.should == 120
+    1.fact.should == 1
+    0.fact.should == 1
+    1000.fact.should == 402387260077093773543702433923003985719374864210714632543799910429938512398629020592044208486969404800479988610197196058631666872994808558901323829669944590997424504087073759918823627727188732519779505950995276120874975462497043601418278094646496291056393887437886487337119181045825783647849977012476632889835955735432513185323958463075557409114262417474349347553428646576611667797396668820291207379143853719588249808126867838374559731746136085379534524221586593201928090878297308431392844403281231558611036976801357304216168747609675871348312025478589320767169132448426236131412508780208000261683151027341827977704784635868170164365024153691398281264810213092761244896359928705114964975419909342221566832572080821333186116811553615836546984046708975602900950537616475847728421889679646244945160765353408198901385442487984959953319101723355556602139450399736280750137837615307127761926849034352625200015888535147331611702103968175921510907788019393178114194545257223865541461062892187960223838971476088506276862967146674697562911234082439208160153780889893964518263243671616762179168909779911903754031274622289988005195444414282012187361745992642956581746628302955570299024324153181617210465832036786906117260158783520751516284225540265170483304226143974286933061690897968482590125458327168226458066526769958652682272807075781391858178889652208164348344825993266043367660176999612831860788386150279465955131156552036093988180612138558600301435694527224206344631797460594682573103790084024432438465657245014402821885252470935190620929023136493273497565513958720559654228749774011413346962715422845862377387538230483865688976461927383814900140767310446640259899490222221765904339901886018566526485061799702356193897017860040811889729918311021171229845901641921068884387121855646124960798722908519296819372388642614839657382291123125024186649353143970137428531926649875337218940694281434118520158014123344828015051399694290153483077644569099073152433278288269864602789864321139083506217095002597389863554277196742822248757586765752344220207573630569498825087968928162753848863396909959826280956121450994871701244516461260379029309120889086942028510640182154399457156805941872748998094254742173582401063677404595741785160829230135358081840096996372524230560855903700624271243416909004153690105933983835777939410970027753472000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
+  end
+end

data/spec/io_spec.rb

@@ -0,0 +1,44 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe DarkIO do
+  it 'should return an array of size 2 when capturing both stdout and stderr' do
+    out = DarkIO::capture_output(:stderr => true, :stdout => true) do
+      STDOUT.print('Hello, World!')
+      STDERR.print('Hello, World!')
+    end
+    out.should be_a_kind_of(Array)
+    out.size.should == 2
+  end
+
+  it 'should return a string when capturing either stdout or stderr' do
+    out = DarkIO::capture_output(:stderr => true, :stdout => false) do
+      STDERR.print('Hello, World!')
+    end
+    out.should be_a_kind_of(String)
+    out = DarkIO::capture_output(:stdout => true, :stderr => false) do
+      STDOUT.print('Hello, World!')
+    end
+    out.should be_a_kind_of(String)
+  end
+
+  it 'should return nil if not capturing anything' do
+    DarkIO::capture_output(:stderr => false, :stdout => false) do
+      STDOUT.print('Hello, World!')
+      STDERR.print('Hello, World!')
+    end.nil?.should be_true
+  end
+
+  it 'should capture output' do
+    HW = 'Hello, World!'
+    out = DarkIO::capture_output { HW.print }
+    out.should == HW
+    out = DarkIO::capture_output(:stderr => true) do
+      (HW + 'STDOUT').print
+      STDERR.print(HW + 'STDERR')
+    end
+    out.shift.should == HW + 'STDOUT'
+    out.shift.should == HW + 'STDERR'
+    out = DarkIO::capture_output(:stderr => true, :stdout => false) { STDERR.print(HW) }
+    out.should == HW
+  end
+end

data/spec/net_spec.rb

@@ -0,0 +1,23 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Net do
+  it 'should respond to the new methods' do
+    Net.should respond_to(*%w(download download_and_save))
+  end
+
+  it 'should raise an exception on 404' do
+    lambda { Net::download('http://www.google.com/pickles.html') }.should raise_error
+  end
+
+  it 'should raise an exception when trying to save an empty path' do
+    lambda { Net::download_and_save('http://www.google.com/','') }.should raise_error
+  end
+
+  it 'should not write anything to the disk if not success' do
+    begin
+      Net::download_and_save('http://www.google.com/pickles.html')
+    rescue
+    end
+    File.exists?('pickles.html').should be_false
+  end
+end

data/spec/numeric_spec.rb

@@ -0,0 +1,52 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Numeric do
+  it 'should respond to the new methods' do
+    [10,10.5].each do |num|
+      num.should respond_to(*%w(square cube sqrt root ln log))
+    end
+  end
+
+  it 'should return Numeric from most new methods' do
+    %w(square cube sqrt root ln log).each do |method|
+      [10,10.5].each do |num|
+        num.send(method.intern).should be_a_kind_of(Numeric)
+      end
+    end
+  end
+
+  it 'should do squares' do
+    4.square.should == 16
+    -4.square.should == 16
+  end
+
+  it 'should do cubes' do
+    3.cube.should == 27
+    -3.cube.should == -27
+  end
+
+  it 'should do square roots' do
+    9.sqrt.should == 3
+    81.sqrt.should == 9
+  end
+
+  it 'should do roots' do
+    9.sqrt.should == 9.root
+    27.root(3).should == 3
+    81.root(4).should == 3
+    5.root(1).should == 5
+    10.root(-1).should == 0.1
+    100.root(-2).should == 0.1
+  end
+
+  it 'should do ln' do
+    Math::E.ln.should == 1
+    Math::PI.ln.should be_close(1.14473, 0.001)
+  end
+
+  it 'should do log' do
+    10.log.should == 1
+    100.log.should == 2
+    Math::PI.log.should be_close(0.4971, 0.0001)
+  end
+end

data/spec/object_spec.rb

@@ -0,0 +1,28 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Object do
+  it 'should respond to the new methods' do
+    Object.new.should respond_to(*%w(try tap))
+  end
+
+  it 'should return itself from tap' do
+    a = Object.new
+    a.tap { |s| }.should equal(a)
+  end
+
+  it 'should return nil from try if called on nil' do
+    nil.try(1) { |a| }.should be_nil
+  end
+
+  it 'should try...like really try' do
+    nil.try { |me| me.foo }.should be_nil
+    true.try { |me| me }.should be_true
+    true.try(:nil?).should_not be_nil
+  end
+
+  it 'should tap dance' do
+    10.tap { |m| m.should == 10 }.should == 10
+    o = Object.new
+    o.tap { |m| m.should == o }.should == o
+  end
+end

data/spec/spec.opts

@@ -0,0 +1,3 @@
+--diff
+--color
+--format nested

data/spec/spec_helper.rb

@@ -0,0 +1,13 @@
+require 'rubygems'
+require 'spec'
+
+# gem install redgreen for colored test output
+begin
+  require 'redgreen' unless ENV['TM_CURRENT_LINE'];
+rescue LoadError
+end
+
+path = File.expand_path(File.dirname(__FILE__) + '/../lib/')
+$LOAD_PATH.unshift(path) unless $LOAD_PATH.include?(path)
+
+require 'lib/darkext'

data/spec/statistics_spec.rb

@@ -0,0 +1,162 @@
+require File.dirname(__FILE__) + '/spec_helper'
+
+describe Array do
+  before(:each) do
+    @a = [1,2,3,4,5,6,7,8,9,10]
+    @hist = [1,2,1,1,3,2,1,1,3,3,3,3,3,2,2,1]
+    @b = [5,1,9,12,6,7,8,8,8,1,2,3,4]
+  end
+
+  it 'should respond to all the new methods' do
+    Array.new.should respond_to(*%w(mean average ave harmonic_mean h_mean geometric_mean g_mean median histogram mode standard_deviation stddev standard_deviation sample ci standardize standardize! sum_of_squares))
+    Darkext::Statistics.should respond_to(*%w(prob zscore))
+    Darkext::Statistics::Regression.should respond_to(*%w(least_squares))
+  end
+
+  it 'should return a Numeric from mean, harmonic_mean, geometric_mean, median, variance, standard_deviation, and sum_of_squares' do
+    %w(mean harmonic_mean geometric_mean median variance standard_deviation sum_of_squares).each do |method|
+      @a.send(method.intern).should be_a_kind_of(Numeric)
+    end
+  end
+
+  it 'should return a hash from histogram' do
+    @a.histogram.should be_a_kind_of(Hash)
+  end
+
+  it 'should return an array from mode, sample, ci, and standardize' do
+    %w(mode sample ci standardize).each do |method|
+      @a.send(method.intern).should be_a_kind_of(Array)
+    end
+  end
+
+  it 'should raise and erro from mean, harmonic_mean, geometric_mean, median, mode, population_variance, sample_variance, standard_deviation, ci, and sum_of_squares if size is zero' do
+    %w(mean harmonic_mean geometric_mean median mode population_variance sample_variance population_deviation sample_deviation geometric_deviation ci sum_of_squares).each do |method|
+      lambda { Array.new.send(method.intern) }.should raise_error
+    end
+  end
+
+  it 'should return a Numeric from prob and zscore' do
+    Darkext::Statistics::prob(1).should be_a_kind_of(Numeric)
+    Darkext::Statistics::zscore(0.9).should be_a_kind_of(Numeric)
+  end
+
+  it 'should return a Hash from least_squares' do
+    Darkext::Statistics::Regression::least_squares([1,2,4,5],[2,3,6,10]).should be_a_kind_of(Hash)
+  end
+
+  it 'should raise an error if the arguments to least_squares have different sizes' do
+    lambda { Darkext::Statistics::Regression::least_squares(@a,[1,2,3]) }.should raise_error
+  end
+
+  it 'should raise an error if either argument has size.zero?' do
+    lambda { Darkext::Statistics::Regression::least_squares(@a,Array.new) }.should raise_error
+  end
+
+  it 'should handle mean' do
+    (1..6).to_a.mean.should == 3.5
+    [1].mean.should == 1
+  end
+
+  it 'should handle harmonic mean' do
+    [60,40].harmonic_mean.should be_close(48, 0.0001)
+    [9].harmonic_mean.should be_close(9, 0.0001)
+  end
+
+  it 'should handle geometric mean' do
+    [2,8].geometric_mean.should == 4
+    [9].geometric_mean.should be_close(9, 0.0001)
+  end
+
+  it 'should handle median' do
+    (1..3).to_a.median.should == 2
+    [1].median.should == 1
+    [2,4,6,8].median.should == 5
+  end
+
+  it 'should make histograms' do
+    @hist.histogram.should == { 1 => 6, 2 => 4, 3 => 6 }
+  end
+
+  it 'should handle mode' do
+    @hist.mode.should == [1,3]
+    (@hist + [1]).mode.should == [1]
+  end
+
+  it 'should handle variance' do
+    (1..6).to_a.variance.should be_close(35/12, 0.0001)
+    [1].variance.should be_close(0, 0.0001)
+    [1,1].variance.should be_close(0, 0.0001)
+    @b.variance.should be_close(10.5, 0.05)
+  end
+
+  it 'should handle std dev' do
+    [2,4,4,4,5,5,7,9].stddev.should be_close(2, 0.0001)
+    @b.stddev.should be_close(3.24, 0.01)
+  end
+
+  it 'should sample' do
+    @hist.sample(5).size.should == 5
+  end
+
+  it 'should handle confidence intervals' do
+    ci = @b.ci
+    ci.shift.should be_close(5.15, 0.01)
+    ci.shift.should be_close(6.24, 0.01)
+    @b.ci(:type => :upper).shift.should be_close(6.15, 0.01)
+    @b.ci(:type => :lower).shift.should be_close(5.24, 0.01)
+  end
+
+  it 'should standardize' do
+    [2,2,4,4].standardize.should == [-1,-1,1,1].map(&:to_f)
+    @b.standardize.size.should == 13
+  end
+
+  it 'should do sum of squares' do
+    (1..3).to_a.sum_of_squares.should == 2.0
+  end
+
+  it 'should do probability' do
+    Darkext::Statistics::prob(2).should be_close(0.96, 0.02)
+    Darkext::Statistics::prob(0.5).should be_close(0.69, 0.02)
+    Darkext::Statistics::prob(Darkext::Statistics::zscore(1)).should be_close(1, 0.0001)
+  end
+
+  it 'should do zscore' do
+    Darkext::Statistics::zscore(0.5).should be_close(0, 0.1)
+    Darkext::Statistics::prob(0.75).should be_close(0.77, 0.02)
+    Darkext::Statistics::zscore(Darkext::Statistics::prob(2.5)).should be_close(2.5, 0.0001)
+  end
+
+  it 'should handle regressions' do
+    xs = [0,1.2,2,2.9,4,5,6]
+    ys = [0.1,1,2.1,3,4.3,4.9,6]
+
+    results = Darkext::Statistics::Regression::least_squares(xs,ys)
+
+    results[:n].should == xs.size
+    results[:b_1].should be_close(1, 0.1)
+    results[:b_0].should be_close(0, 0.1)
+    results[:predicted].size.should == xs.size
+
+    results[:predicted].each_with_index do |pred,index|
+      pred.should be_close(index, 0.3)
+    end
+
+    results[:residuals].size.should == xs.size
+
+    results[:residuals].each_with_index do |pred,index|
+      pred.should be_close(0, 0.3)
+    end
+
+    results[:ss_e].should be_close(0.15, 0.01)
+    results[:ss_t].should be_close(27.49, 0.01)
+    results[:estimator].should be_close(0.03, 0.01)
+    results[:r_2].should be_close(1, 0.01)
+    results[:r].should be_close(1, 0.01)
+
+    eqn = results[:equation]
+    (0..100).each do |i|
+      eqn.call(i).should be_close(i, 0.25)
+    end
+  end
+end