numb 0.10.0 → 0.20.0

data/VERSION

@@ -1 +1 @@
-0.10.0
+0.20.0

data/lib/numb/carmichael.rb

@@ -0,0 +1,8 @@
+class Integer
+  def carmichael?
+    return false unless odd? and composite? and square_free?
+    prime_factors.all? do |p|
+      (self - 1).remainder(p - 1) == 0
+    end
+  end
+end

data/lib/numb/cube.rb

@@ -0,0 +1,8 @@
+class Integer
+  def cube?
+    y = self < 0 ? (-self) : self
+    x = Math.cbrt(y)
+    # The hack below is seemingly needed for 1.8 compatibility
+    x.ceil.to_f.to_s == x.to_s
+  end
+end

data/lib/numb/decagonal.rb

@@ -0,0 +1,5 @@
+class Integer
+  def decagonal?
+    n_gonal?(10)
+  end
+end

data/lib/numb/dodecagonal.rb

@@ -0,0 +1,5 @@
+class Integer
+  def dodecagonal?
+    n_gonal?(12)
+  end
+end

data/lib/numb/dudeney.rb

@@ -10,6 +10,8 @@ class Integer
   #     98.dudeney?    #=> false
   #
   def dudeney?
-    Math.cbrt(self) == self.digits.reduce(:+)
+    # The ugly hack below is seemingly needed for 1.8 compatibility. I ave
+    # yet to understand why.
+    Math.cbrt(self).to_s.sub(/\.0$/,'') == self.digits.reduce(:+).to_s
   end
 end

data/lib/numb/heptagonal.rb

@@ -0,0 +1,5 @@
+class Integer
+  def heptagonal?
+    n_gonal?(7)
+  end
+end

data/lib/numb/hexagonal.rb

@@ -0,0 +1,7 @@
+class Integer
+  def hexagonal?
+    return true if zero?
+    n = ((Math.sqrt((8*self) + 1) + 1)/4)
+    n == n.to_i
+  end
+end

data/lib/numb/myriagonal.rb

@@ -0,0 +1,5 @@
+class Integer
+  def myriagonal?
+    n_gonal?(10_000)
+  end
+end

data/lib/numb/n_gonal.rb

@@ -0,0 +1,8 @@
+class Integer
+  def n_gonal?(n)
+    raise ArgumentError unless n.is_a?(Integer) and n >= 3
+    return true if zero?
+    x = (Math.sqrt((8*n - 16)*self + (n-4)**2) + n - 4) / (2*n - 4)
+    x == x.to_i
+  end
+end

data/lib/numb/octagonal.rb

@@ -0,0 +1,8 @@
+class Integer
+  def octagonal?
+    n_gonal?(8)
+    #return true if zero?
+    #x = (Math.sqrt(48*self + 16) + 4)/12
+    #x.to_i == x
+  end
+end

data/lib/numb/pentagonal.rb

@@ -0,0 +1,5 @@
+class Integer
+  def pentagonal?
+    n_gonal?(5)
+  end
+end

data/lib/numb/ruby1.8.rb

@@ -1,6 +1,6 @@
 module Math
   def self.cbrt(x)
-    (x.to_f**(1.0/3.0)).round.to_f
+    (x.to_f**(1.0/3.0))
   end unless Math.methods.any?{|m| m.to_s == 'cbrt'}
 
   def self.log2(x)

data/lib/numb/triangular.rb

@@ -1,8 +1,6 @@
 # coding: utf-8
 class Integer
   def triangular?
-    return false if self < 0
-    root = Math.sqrt(8 * self + 1)
-    root == root.floor
+    n_gonal?(3)
   end
 end

data/lib/numb.rb

@@ -1,12 +1,14 @@
 # coding: utf-8
 
-libs = %w{abundant achilles automorphic balanced_prime carol composite deficient 
-          dihedral_prime dudeney economical emrip equidigital 
-          extravagant factorion frugal happy harshad hilbert hyperperfect 
-          impolite kaprekar keith kynea lucas lucas_carmichael mms_pair mobius 
-          narcissistic nivenmorphic ordinal parasitic perfect perfect_power 
-          polite polydivisible powerful practical primitive_pseudoperfect
-          pronic rhonda self self_descriptive semiperfect semiprime 
+libs = %w{abundant achilles automorphic balanced_prime carmichael carol 
+          composite cube decagonal deficient dodecagonal dihedral_prime 
+          dudeney economical emrip equidigital extravagant factorion 
+          frugal happy harshad heptagonal hexagonal hilbert hyperperfect 
+          impolite kaprekar keith kynea lucas lucas_carmichael mms_pair 
+          mobius myriagonal narcissistic nivenmorphic n_gonal octagonal 
+          ordinal parasitic pentagonal perfect perfect_power polite 
+          polydivisible powerful practical primitive_pseudoperfect pronic 
+          rhonda self self_descriptive semiperfect semiprime 
           smarandache_wellin smith sophie_germain_prime sphenic square 
           square_free triangular trimorphic undulating vampire weird
 }

data/spec/carmichael_spec.rb

@@ -0,0 +1,20 @@
+describe Integer, "#carmichael?" do
+  # A002997
+  CARMICHAEL = [561,1105,1729,2465,2821,6601,8911,10585,15841,
+                29341,41041,46657,52633,62745,63973,75361,101101,
+                115921,126217,162401,172081,188461,252601,278545,
+                294409,314821,334153,340561,399001,410041,449065,
+                488881,512461]
+
+  CARMICHAEL.each do |n|
+    it "returns true for Carmichael number #{n}" do
+      n.should be_carmichael
+    end
+  end
+
+  ((1..CARMICHAEL.last).to_a - CARMICHAEL).shuffle.first(10).each do |n| 
+    it "returns false for non-Carmichael number #{n}" do
+      n.should_not be_carmichael
+    end
+  end
+end

data/spec/cube_spec.rb

@@ -0,0 +1,24 @@
+describe Integer, "#cube?" do
+  # A000578 
+  CUBES = [0,1,8,27,64,125,216,343,512,729,1000,1331,1728,
+           2197,2744,3375,4096,4913,5832,6859,8000,9261,
+          10648,12167,13824,15625,17576,19683,21952,24389,
+          27000,29791,32768,35937,39304,42875,46656,50653,
+          54872,59319,64000]
+
+  it "returns true for perfect cubes" do
+    CUBES.each{|n| n.should be_cube}
+  end
+
+  it "returns true for negative perfect cubes" do
+    CUBES.shuffle.first(10).each{|n| (-n).should be_cube}
+  end
+
+  it "returns false for non-perfect cubes" do
+    ((0..CUBES.last).to_a - CUBES).shuffle.first(10).each{|n| n.should_not be_cube}
+  end
+
+  it "returns false for negative non-perfect cubes" do
+    ((0..CUBES.last).to_a - CUBES).shuffle.first(10).each{|n| (-n).should_not be_cube}
+  end
+end

data/spec/decagonal_spec.rb

@@ -0,0 +1,16 @@
+describe Integer, "#decagonal?" do
+  # A001107
+  DECAGONAL = [0,1,10,27,52,85,126,175,232,297,370,451,540,637,
+               742,855,976,1105,1242,1387,1540,1701,1870,2047,
+               2232,2425,2626,2835,3052,3277,3510,3751,4000,4257,
+               4522,4795,5076,5365,5662,5967,6280,6601,6930,7267,
+               7612,7965,8326]
+
+  it "returns true for a decagonal number" do
+    DECAGONAL.each{|n| n.should be_decagonal}
+  end
+
+  it "returns false for a non-decagonal number" do
+    ((0..DECAGONAL.last).to_a - DECAGONAL).each{|n| n.should_not be_decagonal}
+  end
+end

data/spec/dodecagonal_spec.rb

@@ -0,0 +1,18 @@
+describe Integer, "#dodecagonal?" do
+  
+  # A051624
+  DODECAGONAL = [0,1,12,33,64,105,156,217,288,369,460,561,672,793,
+                 924,1065,1216,1377,1548,1729,1920,2121,2332,2553,
+                 2784,3025,3276,3537,3808,4089,4380,4681,4992,5313,
+                 5644,5985,6336,6697,7068,7449,7840,8241,8652]
+
+  it "returns true for dodecagonal numbers" do
+    DODECAGONAL.each{|n| n.should be_dodecagonal}
+  end
+
+  it "returns false for non-dodecagonal numbers" do
+    ((0..DODECAGONAL.last).to_a - DODECAGONAL).each do |n| 
+      n.should_not be_dodecagonal
+    end
+  end
+end

data/spec/heptagonal_spec.rb

@@ -0,0 +1,15 @@
+describe Integer, "#heptagonal?" do
+  HEPTAGONAL = [0,1,7,18,34,55,81,112,148,189,235,286,342,403,
+                469,540,616,697,783,874,970,1071,1177,1288,1404,
+                1525,1651,1782,1918,2059,2205,2356,2512,2673,2839,
+                3010,3186,3367,3553,3744,3940,4141,4347,4558,4774,
+                4995,5221,5452,5688]
+
+  it "returns true for a heptagonal number" do
+    HEPTAGONAL.each{|n| n.should be_heptagonal}
+  end
+
+  it "returns false for a non-heptagonal number" do
+    ((0..HEPTAGONAL.last).to_a - HEPTAGONAL).each{|n| n.should_not be_heptagonal}
+  end
+end

data/spec/hexagonal_spec.rb

@@ -0,0 +1,16 @@
+describe Integer, "#hexagonal?" do
+  # A000384
+  HEXAGONAL = [0,1,6,15,28,45,66,91,120,153,190,231,276,325,378,
+               435,496,561,630,703,780,861,946,1035,1128,1225,
+               1326,1431,1540,1653,1770,1891,2016,2145,2278,2415,
+               2556,2701,2850,3003,3160,3321,3486,3655,3828,4005,
+               4186,4371,4560]
+
+  it "returns true for a hexagonal number" do
+    HEXAGONAL.each{|n| n.should be_hexagonal}
+  end
+
+  it "returns false for a non-hexagonal number" do
+    ((0..HEXAGONAL.last).to_a - HEXAGONAL).each{|n| n.should_not be_hexagonal}
+  end
+end

data/spec/myriagonal_spec.rb

@@ -0,0 +1,16 @@
+describe Integer, "#myriagonal?" do
+
+  MYRIAGONAL = [0, 1, 10000, 29997, 59992, 99985, 149976, 209965, 279952, 
+                359937, 449920, 549901, 659880, 779857, 909832, 1049805, 
+                1199776, 1359745, 1529712, 1709677, 1899640, 2099601]
+
+  it "should return true for myriagonal numbers" do
+    MYRIAGONAL.shuffle.first(2).each{|n| n.should be_myriagonal}
+  end
+
+  it "should return false for non-myriagonal numbers" do
+    ((0..MYRIAGONAL.last).to_a - MYRIAGONAL).shuffle.first(2).each do |n| 
+      n.should_not be_myriagonal
+    end
+  end
+end

data/spec/octagonal_spec.rb

@@ -0,0 +1,15 @@
+describe Integer, "#octagonal?" do
+  #A000567
+  OCTAGONAL = [0,1,8,21,40,65,96,133,176,225,280,341,408,481,
+               560,645,736,833,936,1045,1160,1281,1408,1541,1680,
+               1825,1976,2133,2296,2465,2640,2821,3008,3201,3400,
+               3605,3816,4033,4256,4485,4720,4961,5208,5461]
+
+  it "returns true for octagonal numbers" do
+    OCTAGONAL.each{|n| n.should be_octagonal}
+  end
+
+  it "returns false for non-octagonal numbers" do
+    ((0..OCTAGONAL.last).to_a - OCTAGONAL).each{|n| n.should_not be_octagonal}
+  end
+end

data/spec/pentagonal_spec.rb

@@ -0,0 +1,14 @@
+describe Integer, "#pentagonal?" do
+  PENTAGONAL = [0,1,5,12,22,35,51,70,92,117,145,176,210,247,287,
+                330,376,425,477,532,590,651,715,782,852,925,1001,
+                1080,1162,1247,1335,1426,1520,1617,1717,1820,1926,
+                2035,2147,2262,2380,2501,2625,2752,2882,3015,3151]
+
+  it "returns true for pentagonal numbers" do
+    PENTAGONAL.each{|n| n.should be_pentagonal}
+  end
+
+  it "returns false for non-pentagonal numbers" do
+    ((0..PENTAGONAL.last).to_a - PENTAGONAL).each{|n| n.should_not be_pentagonal}
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: numb
 version: !ruby/object:Gem::Version 
-  version: 0.10.0
+  version: 0.20.0
 platform: ruby
 authors: 
 - Run Paint Run Run
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-01-04 00:00:00 +00:00
+date: 2010-01-05 00:00:00 +00:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -43,10 +43,14 @@ files:
 - lib/numb/achilles.rb
 - lib/numb/automorphic.rb
 - lib/numb/balanced_prime.rb
+- lib/numb/carmichael.rb
 - lib/numb/carol.rb
 - lib/numb/composite.rb
+- lib/numb/cube.rb
+- lib/numb/decagonal.rb
 - lib/numb/deficient.rb
 - lib/numb/dihedral_prime.rb
+- lib/numb/dodecagonal.rb
 - lib/numb/dudeney.rb
 - lib/numb/economical.rb
 - lib/numb/emrip.rb
@@ -56,6 +60,8 @@ files:
 - lib/numb/frugal.rb
 - lib/numb/happy.rb
 - lib/numb/harshad.rb
+- lib/numb/heptagonal.rb
+- lib/numb/hexagonal.rb
 - lib/numb/hilbert.rb
 - lib/numb/hyperperfect.rb
 - lib/numb/impolite.rb
@@ -66,10 +72,14 @@ files:
 - lib/numb/lucas_carmichael.rb
 - lib/numb/mms_pair.rb
 - lib/numb/mobius.rb
+- lib/numb/myriagonal.rb
+- lib/numb/n_gonal.rb
 - lib/numb/narcissistic.rb
 - lib/numb/nivenmorphic.rb
+- lib/numb/octagonal.rb
 - lib/numb/ordinal.rb
 - lib/numb/parasitic.rb
+- lib/numb/pentagonal.rb
 - lib/numb/perfect.rb
 - lib/numb/perfect_power.rb
 - lib/numb/polite.rb
@@ -101,11 +111,15 @@ files:
 - spec/achilles_spec.rb
 - spec/automorphic_spec.rb
 - spec/balanced_prime_spec.rb
+- spec/carmichael_spec.rb
 - spec/carol_spec.rb
 - spec/composite_spec.rb
+- spec/cube_spec.rb
+- spec/decagonal_spec.rb
 - spec/deficient_spec.rb
 - spec/digital_sum_spec.rb
 - spec/dihedral_prime_spec.rb
+- spec/dodecagonal_spec.rb
 - spec/dudeney_spec.rb
 - spec/economical_spec.rb
 - spec/emrip_spec.rb
@@ -116,6 +130,8 @@ files:
 - spec/frugal_spec.rb
 - spec/happy_spec.rb
 - spec/harshad_spec.rb
+- spec/heptagonal_spec.rb
+- spec/hexagonal_spec.rb
 - spec/hilbert_spec.rb
 - spec/hyperperfect_spec.rb
 - spec/kaprekar_spec.rb
@@ -125,12 +141,15 @@ files:
 - spec/lucas_spec.rb
 - spec/maris_mcgwire_sosa_pair_spec.rb
 - spec/mobius_spec.rb
+- spec/myriagonal_spec.rb
 - spec/narcissistic_spec.rb
 - spec/nivenmorphic_spec.rb
 - spec/number_of_distinct_prime_factors_spec.rb
 - spec/number_of_prime_factors_spec.rb
+- spec/octagonal_spec.rb
 - spec/ordinal_spec.rb
 - spec/parasitic_spec.rb
+- spec/pentagonal_spec.rb
 - spec/perfect_power_spec.rb
 - spec/perfect_spec.rb
 - spec/polite_spec.rb
@@ -200,15 +219,19 @@ test_files:
 - spec/ordinal_spec.rb
 - spec/perfect_spec.rb
 - spec/perfect_power_spec.rb
+- spec/carmichael_spec.rb
 - spec/polite_spec.rb
 - spec/automorphic_spec.rb
 - spec/hyperperfect_spec.rb
 - spec/spec_helper.rb
+- spec/heptagonal_spec.rb
 - spec/kynea_spec.rb
 - spec/factor_spec.rb
 - spec/emrip_spec.rb
 - spec/smith_spec.rb
+- spec/octagonal_spec.rb
 - spec/vampire_spec.rb
+- spec/dodecagonal_spec.rb
 - spec/dihedral_prime_spec.rb
 - spec/sphenic_spec.rb
 - spec/lucas_carmichael_spec.rb
@@ -222,13 +245,16 @@ test_files:
 - spec/semiprime_spec.rb
 - spec/deficient_spec.rb
 - spec/happy_spec.rb
+- spec/hexagonal_spec.rb
 - spec/triangular_spec.rb
 - spec/semi_perfect_spec.rb
+- spec/pentagonal_spec.rb
 - spec/smarandache_wellin_spec.rb
 - spec/maris_mcgwire_sosa_pair_spec.rb
 - spec/lucas_spec.rb
 - spec/trimorphic_spec.rb
 - spec/harshad_spec.rb
+- spec/cube_spec.rb
 - spec/carol_spec.rb
 - spec/powerful_spec.rb
 - spec/weird_spec.rb
@@ -239,10 +265,12 @@ test_files:
 - spec/undulating_spec.rb
 - spec/extravagant_spec.rb
 - spec/self_descriptive_spec.rb
+- spec/decagonal_spec.rb
 - spec/kaprekar_spec.rb
 - spec/hilbert_spec.rb
 - spec/keith_spec.rb
 - spec/narcissistic_spec.rb
+- spec/myriagonal_spec.rb
 - spec/achilles_spec.rb
 - spec/pronic_spec.rb
 - spec/politeness_spec.rb