alex_r 0.0.1 → 0.0.2

data/example/r_from_file.rb

@@ -1,3 +1,6 @@
+require 'rubygems'
 require 'alex_r'
 
-AlexR.execute("panel_of_pictures.pdf", "panel_of_pictures.r")
+output = File.expand_path(File.join(File.dirname(__FILE__), "panel_of_pictures.pdf"))
+r_script = File.expand_path(File.join(File.dirname(__FILE__), "panel_of_pictures.r"))
+AlexR.execute(output, r_script)

data/example/r_from_string.rb

@@ -1,7 +1,31 @@
+require 'rubygems'
 require 'alex_r'
 
-AlexR.execute("panel_of_pictures.pdf") do |r|
-  File.open("panel_of_pictures.r") do |file|
-    r << file.readlines.join("\n")
-  end
+output = File.expand_path(File.join(File.dirname(__FILE__), "panel_of_pictures.pdf"))
+r_script = %[
+  par(mfrow=c(3,2))
+
+  plot(density(runif(100)), lwd=2)
+  text(x=0, y=0.2, "100 uniforms")
+  abline(h=0, v=0)
+  
+  x=seq(0.01,1,0.01)
+  par(col="blue")
+
+  plot(x, sin(x), type="l")
+  lines(x, cos(x), type="l", col="red")
+
+  plot(x, exp(x), type="l", col="green")
+  lines(x, log(x), type="l", col="orange")
+
+  plot(x, tan(x), type="l", lwd=3, col="yellow")
+
+  plot(x, exp(-x), lwd=2)
+  lines(x, exp(x), col="green", lwd=3)
+
+  plot(x, sin(x*x), type="l")
+  lines(x, sin(1/x), col="pink")
+]
+AlexR.execute(output) do |r|
+  r << r_script
 end

data/lib/alex_r.rb

@@ -2,7 +2,10 @@ require 'open3'
 
 class AlexR
   def self.execute(output_file, input_file_path=nil)
-    stdin, stdout, stderr = Open3.popen3('Rscript -')
+    r_executable = "Rscript -"
+    r_executable = r_executable.insert(0, "cd #{File.dirname(input_file_path)} && ") if input_file_path
+    
+    stdin, stdout, stderr = Open3.popen3(r_executable)
     stdin << "pdf('#{output_file}')\n"
     if input_file_path
       File.open(input_file_path) do |file|

metadata

@@ -1,12 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: alex_r
 version: !ruby/object:Gem::Version 
-  prerelease: false
+  hash: 27
+  prerelease: 
   segments: 
   - 0
   - 0
-  - 1
-  version: 0.0.1
+  - 2
+  version: 0.0.2
 platform: ruby
 authors: 
 - Jae Lee
@@ -45,6 +46,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
@@ -53,13 +55,14 @@ required_rubygems_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.3.7
+rubygems_version: 1.4.2
 signing_key: 
 specification_version: 3
 summary: alex_r is a thin wrapper around RScript