cantor_carpets 0.0.1

data/lib/array2d.rb

@@ -0,0 +1,95 @@
+class Array2D
+  attr_accessor :state
+
+  def initialize(rows, columns, value=nil)
+    @state = Array.new(rows) { Array.new(columns) { value } }
+  end
+
+  def each(&block)
+    @state.each do |row|
+      row.each do |e|
+        yield e
+      end
+    end
+  end
+
+  def each_with_index(&block)
+    @state.each_with_index do |row, row_index|
+      row.each_with_index do |e, column_index|
+        yield e, [row_index, column_index]
+      end
+    end   
+  end
+
+  def to_s
+    @state.to_s
+  end
+
+  def ==(o)
+    o.class == self.class && o.state == state
+  end
+
+  def size
+    [@state.size, @state[0].size]
+  end
+
+  def row_size
+    @state.size
+  end
+
+  def column_size
+    @state[0].size
+  end
+
+  def []=(x, y, value)
+    case x
+    when Integer
+      case y
+      when Integer
+        @state[x][y] = value
+      when Range
+        y.each {|yi| @state[x][yi] = value[yi - y.first]}    
+      end
+    when Range
+      case y
+      when Integer
+        x.each {|xi| @state[xi][y] = value[xi - x.first]}
+      when Range
+        x.each do |xi|
+          y.each do |yi|
+            @state[xi][yi] = value[xi - x.first, yi - y.first]
+          end
+        end
+      end
+    end
+  end
+
+  def [](x, y)
+    case x
+    when Integer
+      case y
+      when Integer
+        @state[x][y]
+      when Range
+        subarray = Array.new(y.to_a.size)
+        y.each {|yi| subarray[yi - y.first] = @state[x][yi]}
+        subarray
+      end
+    when Range
+      case y
+      when Integer
+        subarray = Array.new(x.to_a.size)
+        x.each {|xi| subarray[xi - x.first] = @state[xi][y]}
+        subarray
+      when Range
+        subarray = Array2D.new(x.to_a.size, y.to_a.size)
+        x.each do |xi|
+          y.each do |yi|
+            subarray.state[xi - x.first][yi - y.first] = @state[xi][yi]
+          end
+        end
+        subarray
+      end
+    end
+  end
+end

data/lib/cantor_carpets.rb

@@ -0,0 +1 @@
+require_relative 'carpet'

data/lib/carpet.rb

@@ -0,0 +1,56 @@
+require 'png'
+require_relative 'array2d'
+
+class Carpet
+  attr_reader :seed, :depth, :bits, :image
+
+  def initialize(seed, depth)
+    @seed = seed
+    @depth = depth
+    compute_carpet
+  end
+
+  def compute_carpet
+    @bits = calculate_bits(new_bit_array)
+    @image = create_image
+  end
+
+  def new_bit_array
+    Array2D.new(@seed.row_size ** @depth, 
+                @seed.column_size ** @depth, 0)
+  end
+
+  def calculate_bits(bit_array)
+    if bit_array.size == @seed.size
+      return @seed
+    end
+
+    row_chunk = bit_array.row_size / @seed.row_size
+    col_chunk = bit_array.column_size / @seed.column_size
+
+    @seed.each_with_index do |e, index|
+      xi = index[0]
+      yi = index[1]
+      row_range = (row_chunk * xi)...(row_chunk * (xi + 1))
+      column_range = (col_chunk * yi)...(col_chunk * (yi + 1))
+      if e == 1
+        bit_array[row_range, column_range] = calculate_bits(bit_array[row_range, column_range])
+      end
+    end
+    bit_array 
+  end
+
+  def create_image
+    canvas = PNG::Canvas.new(@seed.column_size ** @depth, 
+                             @seed.row_size ** @depth,
+                             PNG::Color::White)
+    canvas.each do |x, y, color|
+      canvas[x, y] = PNG::Color::Black if @bits[-y, x] == 1
+    end
+    PNG.new(canvas)
+  end
+
+  def write_image(name='carpet.png')
+    @image.save(name)
+  end
+end

metadata

@@ -0,0 +1,48 @@
+--- !ruby/object:Gem::Specification
+name: cantor_carpets
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Luke Grecki
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-09-28 00:00:00.000000000 Z
+dependencies: []
+description: You can generate cantor dust, sierpinski carpet, and other 2D cantor
+  sets.
+email: lukegrecki@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/array2d.rb
+- lib/cantor_carpets.rb
+- lib/carpet.rb
+homepage: http://rubygems.org/gems/cantor_carpets
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.11
+signing_key: 
+specification_version: 3
+summary: Generate images of 2D cantor sets
+test_files: []