/usr/lib/python2.7/dist-packages/rpy2/robjects/tests/testEnvironment.py is in python-rpy2 2.8.5-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 | import unittest
import rpy2.robjects as robjects
rinterface = robjects.rinterface
import array
class EnvironmentTestCase(unittest.TestCase):
def testNew(self):
env = robjects.Environment()
self.assertEqual(rinterface.ENVSXP, env.typeof)
def testNewValueError(self):
self.assertRaises(ValueError, robjects.Environment, 'a')
def testSetItem(self):
env = robjects.Environment()
env['a'] = 123
self.assertTrue('a' in env)
def testKeys(self):
env = robjects.Environment()
env['a'] = 123
keys = list(env.keys())
self.assertEquals(1, len(keys))
keys.sort()
for it_a, it_b in zip(keys,
('a',)):
self.assertEquals(it_a, it_b)
def testItems(self):
env = robjects.Environment()
env['a'] = 123
items = list(env.items())
self.assertEquals(1, len(items))
items.sort(key=lambda x: x[0])
for it_a, it_b in zip(items,
(('a', 123),)):
self.assertEquals(it_a[0], it_b[0])
self.assertEquals(it_a[1][0], it_b[1])
def suite():
suite = unittest.TestLoader().loadTestsFromTestCase(EnvironmentTestCase)
return suite
if __name__ == '__main__':
unittest.main()
|