markov-reloaded 0.0.0

data/lib/markov-reloaded.rb

@@ -0,0 +1,103 @@
+require 'string-enumerable'
+class String
+	def spaceNewLines
+		out = ""
+		for i in self
+			if i == "\n"
+				out += " "
+				out += "\n"
+			else
+				out += i
+			end
+		end
+		out
+	end
+
+	def toMarkovArray(separator, terminator)
+		arr = self.dup
+		arr += separator if self[self.length-1] != separator
+		arr = arr.lines(separator)
+		arr = arr.map do |e| e.chop end
+		array = []
+		for i in arr
+			if i[i.length-1] == terminator
+				array.push(i.chop)
+				array.push(terminator)
+			else
+				array.push i
+			end
+		end
+		array
+	end
+end
+class Array
+	def pickRand(rng)
+		r = rng.rand(length)
+		self[r]
+	end
+	def toMarkov(order)
+		data = Hash.new(:Error)
+		array = self
+		for i in 0..array.length-1-order
+			el = array[i..i+order-1]
+			if data.include? el
+				data[el].push array[i+order]# unless i+order+1 == array.length
+			else
+				data[el] = [array[i+order]]# unless i+order+1 == array.length
+			end
+		end
+		Markov.new(data, order)
+	end
+end
+class Markov
+	def initialize (data, order)
+		@data = data
+		@order = order
+	end
+	attr_accessor :data
+	def add(array)
+		self.+(array.toMarkov, @order)
+	end
+	def self.analyze(array, order)
+		data = Hash.new(:Error)
+		for i in 0..array.length-1-order
+			el = array[i..i+order-1]
+			if data.include? el
+				data[el].push array[i+order]# unless i+order+1 == array.length
+			else
+				data[el] = [array[i+order]]# unless i+order+1 == array.length
+			end
+		end
+		Markov.new(data, order)
+	end
+	def +(mark)
+		hash = mark.data
+		hash.each do |key, value|
+			if @data.include? key
+				@data[key] += value
+			else
+				@data[key] = value
+			end
+		end
+	end
+	 	def pickElement(element, random)
+		arr = @data[element]
+		i = random.rand(arr.length)
+		arr[i]
+	end
+	attr_accessor :data
+	def generate(maxlength, first= [], seed, terminator)
+		r = Random.new seed
+		first = @data.keys.pickRand(r) if first == []
+		out = first.dup
+		pick = out.dup
+		for i in 0..(maxlength-@order)
+			element = pickElement(pick, r)
+			out.push element
+			pick = pick.drop 1
+			pick.push element
+			break if element == terminator
+		end
+		return out
+	end
+end

metadata

@@ -0,0 +1,47 @@
+--- !ruby/object:Gem::Specification
+name: markov-reloaded
+version: !ruby/object:Gem::Version
+  version: 0.0.0
+  prerelease: 
+platform: ruby
+authors:
+- Eigil Rischel
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-08-21 00:00:00.000000000 Z
+dependencies: []
+description: ! "markov-reloaded provides a simple interface to create markov chains.\n\tthe
+  system is based on hashes, but provides flexible methods to generate the chains
+  based on any array, and to generate suitable arrays from strings."
+email: ayegill@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/markov-reloaded.rb
+homepage: http://rubygems.org/gems/string-enumerable
+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.24
+signing_key: 
+specification_version: 3
+summary: flexible, hash-based system for markov chain generation
+test_files: []