Revision: 565
          http://rpy.svn.sourceforge.net/rpy/?rev=565&view=rev
Author:   lgautier
Date:     2008-06-25 14:07:08 -0700 (Wed, 25 Jun 2008)

Log Message:
-----------
Missing tests for RFormula

Added Paths:
-----------
    branches/rpy_nextgen/rpy/robjects/tests/testRFormula.py

Added: branches/rpy_nextgen/rpy/robjects/tests/testRFormula.py
===================================================================
--- branches/rpy_nextgen/rpy/robjects/tests/testRFormula.py                     
        (rev 0)
+++ branches/rpy_nextgen/rpy/robjects/tests/testRFormula.py     2008-06-25 
21:07:08 UTC (rev 565)
@@ -0,0 +1,22 @@
+import unittest
+import rpy2.robjects as robjects
+rinterface = robjects.rinterface
+
+class RFormulaTestCase(unittest.TestCase):
+
+    def testNew(self):
+        fml = robjects.RFormula("y ~ x")
+        self.assertEquals("formula", fml.rclass()[0])
+        
+    def testGetenvironment(self):
+        fml = robjects.RFormula("y ~ x")
+        env = fml.getenvironment()
+        self.assertEquals("environment", env.rclass()[0])
+
+
+def suite():
+    suite = unittest.TestLoader().loadTestsFromTestCase(RFormulaTestCase)
+    return suite
+
+if __name__ == '__main__':
+     unittest.main()


Property changes on: branches/rpy_nextgen/rpy/robjects/tests/testRFormula.py
___________________________________________________________________
Name: svn:eol-style
   + native


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.

-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
rpy-list mailing list
rpy-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/rpy-list

Reply via email to