alex_r 0.0.1

data/example/panel_of_pictures.r

@@ -0,0 +1,33 @@
+# Goal: To make a panel of pictures.
+
+par(mfrow=c(3,2))                       # 3 rows, 2 columns.
+
+# Now the next 6 pictures will be placed on these 6 regions. :-)
+
+# Let me take some pains on the 1st
+plot(density(runif(100)), lwd=2)
+text(x=0, y=0.2, "100 uniforms")        # Showing you how to place text at will
+abline(h=0, v=0)
+              # All these statements effect the 1st plot.
+
+x=seq(0.01,1,0.01)
+par(col="blue")                         # default colour to blue.
+
+# 2 --
+plot(x, sin(x), type="l")
+lines(x, cos(x), type="l", col="red")
+
+# 3 --
+plot(x, exp(x), type="l", col="green")
+lines(x, log(x), type="l", col="orange")
+
+# 4 --
+plot(x, tan(x), type="l", lwd=3, col="yellow")
+
+# 5 --
+plot(x, exp(-x), lwd=2)
+lines(x, exp(x), col="green", lwd=3)
+
+# 6 --
+plot(x, sin(x*x), type="l")
+lines(x, sin(1/x), col="pink")

data/example/r_from_file.rb

@@ -0,0 +1,3 @@
+require 'alex_r'
+
+AlexR.execute("panel_of_pictures.pdf", "panel_of_pictures.r")

data/example/r_from_string.rb

@@ -0,0 +1,7 @@
+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
+end

data/lib/alex_r.rb

@@ -0,0 +1,22 @@
+require 'open3'
+
+class AlexR
+  def self.execute(output_file, input_file_path=nil)
+    stdin, stdout, stderr = Open3.popen3('Rscript -')
+    stdin << "pdf('#{output_file}')\n"
+    if input_file_path
+      File.open(input_file_path) do |file|
+        until file.eof?
+          stdin << "#{file.readline}\n"
+        end
+      end
+    else
+      yield(stdin) if block_given?
+    end
+    stdin.close
+    
+    errors = stderr.readlines
+    raise errors.join("\n") unless errors.empty?
+    return stdout.readlines.join("\n")
+  end
+end

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification 
+name: alex_r
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Jae Lee
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-02-09 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: Allows you execute RScript
+email: jlee@yetitrails.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/alex_r.rb
+- example/r_from_file.rb
+- example/r_from_string.rb
+- example/panel_of_pictures.r
+has_rdoc: true
+homepage: https://github.com/forward/AlexR
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: alex_r is a thin wrapper around RScript
+test_files: []
+