Ruby實(shí)現(xiàn)的矩陣連乘算法
更新時(shí)間:2015年05月22日 11:34:41 投稿:junjie
這篇文章主要介紹了Ruby實(shí)現(xiàn)的矩陣連乘算法,本文直接給出實(shí)現(xiàn)代碼,需要的朋友可以參考下
動(dòng)態(tài)規(guī)劃解決矩陣連乘問(wèn)題,隨機(jī)產(chǎn)生矩陣序列,輸出形如((A1(A2A3))(A4A5))的結(jié)果。
代碼:
#encoding: utf-8 =begin author: xu jin, 4100213 date: Oct 28, 2012 MatrixChain to find an optimum order by using MatrixChain algorithm example output: The given array is:[30, 35, 15, 5, 10, 20, 25] The optimum order is:((A1(A2A3))((A4A5)A6)) The total number of multiplications is: 15125 The random array is:[5, 8, 8, 2, 5, 9] The optimum order is:((A1(A2A3))(A4A5)) The total number of multiplications is: 388 =end INFINTIY = 1 / 0.0 p = [30, 35, 15, 5, 10, 20, 25] m, s = Array.new(p.size){Array.new(p.size)}, Array.new(p.size){Array.new(p.size)} def matrix_chain_order(p, m, s) n = p.size - 1 (1..n).each{|i| m[i][i] = 0} for r in (2..n) do for i in (1..n - r + 1) do j = r + i - 1 m[i][j] = INFINTIY for k in (i...j) do q = m[i][k] + m[k + 1][j] + p[i - 1] * p[k] * p[j] m[i][j], s[i][j] = q, k if(q < m[i][j]) end end end end def print_optimal_parens(s, i, j) if(i == j) then print "A" + i.to_s else print "(" print_optimal_parens(s, i, s[i][j]) print_optimal_parens(s, s[i][j] + 1, j) print ")" end end def process(p, m, s) matrix_chain_order(p, m, s) print "The optimum order is:" print_optimal_parens(s, 1, p.size - 1) printf("\nThe total number of multiplications is: %d\n\n", m[1][p.size - 1]) end puts "The given array is:" + p.to_s process(p, m, s) #produce a random array p = Array.new x = rand(10) (0..x).each{|index| p[index] = rand(10) + 1} puts "The random array is:" + p.to_s m, s = Array.new(p.size){Array.new(p.size)}, Array.new(p.size){Array.new(p.size)} process(p, m, s)
相關(guān)文章
Ruby中require、load、include、extend的區(qū)別介紹
這篇文章主要介紹了Ruby中require、load、include、extend的區(qū)別介紹,require、load用于文件,如.rb等等結(jié)尾的文件,include、load則用于包含一個(gè)文件中的模塊,需要的朋友可以參考下2015-05-05Ruby簡(jiǎn)潔學(xué)習(xí)筆記(一):字符串、數(shù)字、類和對(duì)象
這篇文章主要介紹了Ruby簡(jiǎn)潔學(xué)習(xí)筆記(一):字符串、數(shù)字、類和對(duì)象,本文是學(xué)習(xí)筆記第一篇,需要的朋友可以參考下2015-01-01淘寶網(wǎng)提供的國(guó)內(nèi)RubyGems鏡像簡(jiǎn)介和使用方法
由于國(guó)內(nèi)的網(wǎng)絡(luò)環(huán)境,導(dǎo)致 rubygems.org 存放在 Amazon S3 上面的資源文件間歇性連接失敗,因此使用gem或bundle時(shí)常常會(huì)遇到長(zhǎng)久無(wú)響應(yīng)的情況2014-04-04