Class: ERObj

Inherits:
Object
  • Object
show all
Defined in:
lib/rsruby/erobj.rb

Overview

Synopsis

This is an extended RObj class inspired by the example given in the RPy manual. Methods caught by method_missing are converted into attribute calls on the R object it represents. Also to_s is redefined to print exactly the representation used in R.

Usage

See examples/erobj.rb for examples of usage.

--

Author

Alex Gutteridge

Copyright (C) 2006 Alex Gutteridge

The Original Code is the RPy python module.

The Initial Developer of the Original Code is Walter Moreira. Portions created by the Initial Developer are Copyright (C) 2002 the Initial Developer. All Rights Reserved.

Contributor(s):

Gregory R. Warnes <[email protected]> (RPy Maintainer)

This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version.

This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA ++

Direct Known Subclasses

DataFrame

Constant Summary collapse

@@x = 
1

Instance Method Summary collapse

Constructor Details

#initialize(robj) ⇒ ERObj

The ERObj is intialised by passing it an RObj instance which it then stores



51
52
53
54
 
# File 'lib/rsruby/erobj.rb', line 51

def initialize(robj)
  @robj = robj
  @r    = RSRuby.instance
end

Dynamic Method Handling

This class handles dynamic methods through the method_missing method

#method_missing(attr) ⇒ Object

Methods caught by method_missing are converted into attribute calls on the R object it represents.



97
98
99
100
101
102
103
 
# File 'lib/rsruby/erobj.rb', line 97

def method_missing(attr)
  mode = RSRuby.get_default_mode
  RSRuby.set_default_mode(RSRuby::BASIC_CONVERSION)
  e = @r['$'].call(@robj,attr.to_s)
  RSRuby.set_default_mode(mode)
  return e
end

Instance Method Details

#as_r ⇒ Object

Returns the storred RObj.



57
58
59
 
# File 'lib/rsruby/erobj.rb', line 57

def as_r
  @robj.as_r
end

#lcall(args) ⇒ Object

Calls the storred RObj.



68
69
70
 
# File 'lib/rsruby/erobj.rb', line 68

def lcall(args)
  @robj.lcall(args)
end

#to_ruby ⇒ Object

Returns the Ruby representation of the object according to the basic conversion mode.



63
64
65
 
# File 'lib/rsruby/erobj.rb', line 63

def to_ruby
  @robj.to_ruby(RSRuby::BASIC_CONVERSION)
end

#to_s ⇒ Object

Outputs the string representation provided by R.



73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
 
# File 'lib/rsruby/erobj.rb', line 73

def to_s

  @@x += 1

  mode = RSRuby.get_default_mode
  RSRuby.set_default_mode(RSRuby::NO_CONVERSION)
  a = @r.textConnection("tmpobj#{@@x}",'w')

  RSRuby.set_default_mode(RSRuby::VECTOR_CONVERSION)
  @r.sink(:file => a, :type => 'output')
  @r.print_(@robj)
  @r.sink.call()
  @r.close_connection(a)

  str = @r["tmpobj#{@@x}"].join("\n")

  RSRuby.set_default_mode(mode)

  return str

end