Class: RExperimentAnalysis

Inherits:

Object

• Object
• RExperimentAnalysis

Defined in:

lib/flukso/plots.rb

Overview

The following classes provide some ideas. Not used.

Instance Method Summary

• #initialize(path, datafile, loadlevel) ⇒ RExperimentAnalysis constructor

  A new instance of RExperimentAnalysis.

• #plotSingleRun ⇒ Object
• #plotSingleRun_perfPrefHistogram ⇒ Object
• #plotSingleRun_PerfPrefVsQueueTime ⇒ Object
• #plotSingleRun_Price ⇒ Object
• #plotSingleRun_PriceHistogram ⇒ Object
• #plotSingleRun_PricePerSecond ⇒ Object
• #plotSingleRun_PricePrefVsPrice ⇒ Object
• #plotSingleRun_QueuetimeHistogram ⇒ Object
• #plotSingleRun_Queuetimes ⇒ Object

Constructor Details

#initialize(path, datafile, loadlevel) ⇒ RExperimentAnalysis

Returns a new instance of RExperimentAnalysis.

# File 'lib/flukso/plots.rb', line 147

def initialize(path, datafile, loadlevel)
  @workingdir=path
  @datafile = File.expand_path(File.join(path, datafile))
  @loadlevel = loadlevel
  puts "Using data from file #{@datafile}" if $verbose
  @runner = RRunner.new(path)
end

Instance Method Details

#plotSingleRun ⇒ Object

# File 'lib/flukso/plots.rb', line 251

def plotSingleRun
  methods.grep(/^plotSingleRun_/){|m|
    self.send(m)
  }
  sleep(1)
end

#plotSingleRun_perfPrefHistogram ⇒ Object

# File 'lib/flukso/plots.rb', line 239

def plotSingleRun_perfPrefHistogram
  drawcmd="    hist(data$perfpref,\n      main=\"Histogram of user preferences\",\n      xlab=\"Performance Preference\",\n      ylab=\"Frequency\"\n    )\n  END_OF_CMD\n  outfile=\"histperfpref-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_PerfPrefVsQueueTime ⇒ Object

# File 'lib/flukso/plots.rb', line 191

def plotSingleRun_PerfPrefVsQueueTime()
  drawcmd="    plot(data$perfpref, data$qtime,\n      main=\"Performance preference vs. queuetime\",\n      xlab=\"Performance Preference\",\n      ylab=\"absolute queuetime [s]\"\n    )\n  END_OF_CMD\n  outfile=\"perfprefvsqtime-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_Price ⇒ Object

# File 'lib/flukso/plots.rb', line 167

def plotSingleRun_Price
  drawcmd="    plot(data$price,\n      main=\"Price for all jobs\",\n      xlab=\"Job ID\",\n      ylab=\"price\"\n    )\n  END_OF_CMD\n  outfile=\"price-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_PriceHistogram ⇒ Object

# File 'lib/flukso/plots.rb', line 215

def plotSingleRun_PriceHistogram
  drawcmd="    hist(data$pricert,\n      main=\"Histogram of prices per second\",\n      xlab=\"Price per second\",\n      ylab=\"Frequency\"\n    )\n  END_OF_CMD\n  outfile=\"histpricepersecond-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_PricePerSecond ⇒ Object

# File 'lib/flukso/plots.rb', line 203

def plotSingleRun_PricePerSecond
  drawcmd="    plot(data$pricert,\n      main=\"Price per second for all jobs\",\n      xlab=\"Job ID\",\n      ylab=\"price/runtime [price/s]\"\n    )\n  END_OF_CMD\n  outfile=\"pricepersecond-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_PricePrefVsPrice ⇒ Object

# File 'lib/flukso/plots.rb', line 179

def plotSingleRun_PricePrefVsPrice()
  drawcmd="    plot(data$pricepref, data$pricert,\n      main=\"Price preference vs. price per second\",\n      xlab=\"Price Preference\",\n      ylab=\"price/runtime [price/s]\"\n    )\n  END_OF_CMD\n  outfile=\"priceprefvspricert-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_QueuetimeHistogram ⇒ Object

# File 'lib/flukso/plots.rb', line 227

def plotSingleRun_QueuetimeHistogram
  drawcmd="    hist(data$qtime,\n      main=\"Histogram of queuetimes\",\n      xlab=\"Queuetime [s]\",\n      ylab=\"Frequency\"\n    )\n  END_OF_CMD\n  outfile=\"histqueuetimes-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"

#plotSingleRun_Queuetimes ⇒ Object

# File 'lib/flukso/plots.rb', line 155

def plotSingleRun_Queuetimes
  drawcmd="    plot(data$stime, data$qtime,\n      main=\"Queuetime for all jobs\",\n      xlab=\"submittime\",\n      ylab=\"queuetime\"\n    )\n  END_OF_CMD\n  outfile=\"queuetimes-\"+@loadlevel.to_s\n  @runner.execute(@datafile, outfile, drawcmd)\nend\n"