4321f24b38
git-svn-id: svn://svn.cy55.de/Zope3/src/cybertools/trunk@2099 fd906abe-77d9-0310-91a1-e0d9ade77398
35 lines
2.2 KiB
Text
35 lines
2.2 KiB
Text
==================================================
|
|
Using the R Statistics Package with Python Scripts
|
|
==================================================
|
|
|
|
>>> from cybertools.pyscript.tests import Root
|
|
>>> from cybertools.pyscript.script import PythonScript
|
|
|
|
>>> pp = PythonScript()
|
|
>>> pp.__parent__ = Root()
|
|
>>> pp.__name__ = 'pp'
|
|
>>> request = None
|
|
|
|
>>> pp.setSource(u"return 'Hello World'")
|
|
>>> pp(request)
|
|
'Hello World'
|
|
|
|
>>> source = """
|
|
... data = [('r1', 'c1', 1),
|
|
... ('r1', 'c2', 1),
|
|
... ('r1', 'c3', 0),
|
|
... ('r2', 'c1', 0),
|
|
... ('r2', 'c2', 1),
|
|
... ('r2', 'c3', 1),
|
|
... ('r3', 'c1', 0),
|
|
... ('r3', 'c2', 1),
|
|
... ]
|
|
... data = [('q050', 'user1', 0), ('q044', 'user1', 1), ('q039', 'user1', 1), ('q041', 'user1', 0), ('q036', 'user1', 0), ('q053', 'user1', 0), ('q049', 'user1', 1), ('q057', 'user1', 0), ('q059', 'user1', 0), ('q060', 'user1', 0), ('q056', 'user1', 1), ('q047', 'user1', 1), ('q057', 'user1', 0), ('q041', 'user1', 1), ('q039', 'user1', 1), ('q038', 'user1', 1), ('q046', 'user1', 1), ('q040', 'user1', 1), ('q056', 'user1', 0), ('q059', 'user10', 0), ('q050', 'user10', 0), ('q058', 'user10', 0), ('q040', 'user10', 0), ('q052', 'user10', 0), ('q055', 'user10', 1), ('q039', 'user10', 1), ('q057', 'user10', 0), ('q049', 'user10', 1), ('q051', 'user10', 1), ('q041', 'user10', 1), ('q047', 'user10', 1), ('q038', 'user10', 1), ('q056', 'user10', 0), ('q037', 'user10', 1), ('q055', 'user10', 1), ('q054', 'user10', 0), ('q041', 'user10', 1), ('q044', 'user10', 1), ('q049', 'user10', 1), ('q048', 'user10', 1), ('q061', 'user10', 0), ('q056', 'user10', 1), ('q058', 'user10', 0), ('q042', 'user10', 0), ('q041', 'user10', 1), ('q036', 'user10', 1), ('q040', 'user10', 1), ('q059', 'user10', 1), ('q058', 'user10', 1), ('q057', 'user10', 0), ('q054', 'user10', 1), ('q037', 'user1', 1), ('q038', 'user1', 1), ('q047', 'user1', 1), ('q041', 'user1', 1), ('q051', 'user1', 1), ('q048', 'user1', 1), ('q058', 'user1', 1), ('q060', 'user1', 1)]
|
|
... matrix = rstat.getDataFrame(data)
|
|
... #return matrix
|
|
... #return rstat.intermediateData
|
|
... x = rpy.with_mode(rpy.BASIC_CONVERSION, r.descript)(matrix)
|
|
... return x
|
|
... """
|
|
>>> pp.setSource(source)
|
|
>>> pp(request)
|