Note
This is an experimental package, and some of the ideas experimented here have already made it to rpy2.robjects.
For interactive work the “R magic” extension to ipython is also providing useful features for interactive work.
R is very often used as an interactive toplevel, or read-eval-print loop (REPL). This is convenient when analyzing data: type some code, get the result, type some new code and further analysis based on the results.
Python can also be used in a similar fashion, but limitations of the default Python console have lead to the creation of alternative consoles and interactive development editors (idle, ipython, bpython, emacs mode, komodo, ...). Features such as code highlighting, autocompletion, and convenient display of help strings or function signatures have made those valuable tools.
The package rpy2.interactive aims at interactive users, but can be used in non-interactive code as well. It is trading flexibility or performances for ease-of-use.
>>> import rpy2.interactive as r
>>> import rpy2.interactive.packages # this can take few seconds
>>> v = r.IntVector((1,2,3))
>>> r.packages.importr('datasets')
rpy2.robjecs.packages.Package as a <module 'datasets' (built-in)>
>>> data = rpy2.interactive.packages.data
>>> rpackages = r.packages.packages
>>> # list of datasets
>>> data(rpackages.datasets).names()
# list here
>>> env = data(rpackages.datasets).fetch('trees')
>>> tuple(env['trees'].names)
('Girth', 'Height', 'Volume')
>>> import rpy2.interactive as r
>>> r.IntVector(range(10))
<IntVector - Python:0x935774c / R:0xa22b440>
[ 0, 1, 2, ..., 7, 8, 9]
>>> r.IntVector(range(100))
<IntVector - Python:0xa1c2dcc / R:0x9ac5540>
[ 0, 1, 2, ..., 97, 98, 99]
In R, there are no scalars.
>>> r.packages.base.pi
<FloatVector - Python:0xa1d7a0c / R:0x9de02a8>
[3.141593]
To know more, please check Section R vectors.
R has a rich selection of packages, known in other computer languages and systems as libraries.
R Packages can be:
When starting R, the base package as well as by default the packages grDevices, graphics, methods, stats, and utils are loaded.
We start with the loading of R packages since this is a very common operation in R, and since R is typically distributed with recommended packages one can immediately start playing with.
Loading installed R packages can be done through the function importr().
>>> import rpy2.interactive as r
>>> import rpy2.interactive.packages # this can take few seconds
>>> r.packages.importr("cluster")
rpy2.robjecs.packages.Package as a <module 'cluster' (built-in)>
The function returns a package object, and also adds a reference to it in r.packages.packages
>>> rlib = r.packages.packages
>>> rlib.cluster
rpy2.robjecs.packages.Package as a <module 'cluster' (built-in)>
All objects in the R package cluster can subsequently be accessed through that namespace object. For example, for the function barplot:
>>> rlib.cluster.silhouette
<SignatureTranslatedFunction - Python:0x24f9418 / R:0x2f5b008>
Similarly, other packages such as nlme, and datasets can be loaded.
>>> r.packages.importr("nlme")
rpy2.robjecs.packages.Package as a <module 'stats' (built-in)>
>>> r.packages.importr("datasets")
rpy2.robjecs.packages.Package as a <module 'datasets' (built-in)>
We can then demonstrate how to access objects in R packages through a graphical example:
r.packages.graphics.coplot(r.Formula('Time ~ conc | Wt'),
r.packages.datasets.Theoph)
R has a function to list the available packages.
>>> import rpy2.interactive as r
>>> import rpy2.interactive.packages # this can take few seconds
>>> r.packages.importr("utils")
>>> rlib = r.packages.packages
>>> m = rlib.utils.available_packages()
The object returned is a rpy2.robjects.vectors.Matrix, with one package per row (there are many packages in the default CRAN repository).
>>> tuple(m.dim)
(2692, 13)
>>> tuple(m.colnames)
('Package', 'Version', 'Priority', 'Depends', 'Imports', 'LinkingTo', 'Suggests', 'Enhances', 'OS_type', 'License', 'Archs', 'File', 'Repository')
Note
Specific repositories can be specified.
For example with bioconductor.
import rpy2.rinteractive as r
bioc_rooturl = "http://www.bioconductor.org/packages"
bioc_version = "2.7"
bioc_sections = ("bioc", "data/annotation", "data/experiment", "extra")
repos = r.vectors.StrVector(["/".join((bioc_rooturl, bioc_version, x)) for x in bioc_sections])
m_bioc = rlib.utils.available_packages(contriburl = r.packages.utils.contrib_url(repos))
Note
To install a package for repositories, we have to load the package utils. See Section load-packages for details about loading packages
>>> import rpy2.interactive as r
>>> import rpy2.interactive.packages # this can take few seconds
>>> rlib = r.packages.packages
>>> r.packages.importr("utils")
>>> package_name = "lme4"
>>> rlib.utils.install_packages(package_name)
Once a package is installed it will be available for future use without having the need to install it again (unless a different version of R is used).
In order to perform operations like refreshing interactive graphical devices, R need to process the events triggering the refresh.
>>> from rpy2.interactive import process_revents
>>> process_revents.start()
>>> from rpy2.robjects.packages import importr
>>> from rpy2.robjects.vectors import IntVector
>>> graphics = importr("graphics")
>>> graphics.barplot(IntVector((1,3,2,5,4)), ylab="Value")
Now the R graphical device is updated when resized. Should one wish to stop processing the events:
>>> process_revents.stop()
The processing can be resumed, stopped again, and this repeated ad libitum.
The frequency with which the processing of R events is performed can be roughly controlled. The thread is put to sleep for an arbitray duration between each processing of R events.
>>> process_revents.EventProcessor.interval
0.2
This value can be changed and set to an other value if more or less frequent processing is wished. This can be done while the threaded processing is active and will be taken into account at the next sleep cycle.
>>> process_revents.EventProcessor.interval = 1.0
Process R events. This function is a simple wrapper around R_ProcessEvents (on win32 and MacOS X-Aqua) and R_runHandlers (on other platforms).
Magic command interface for interactive work with R in ipython. %R and %%R are the line and cell magics, respectively.
Note
You will need a working copy of R.
To enable the magics below, execute %load_ext rpy2.ipython.
%R
- %R [-i INPUT] [-o OUTPUT] [-n] [-w WIDTH] [-h HEIGHT] [-p POINTSIZE]
- [-b BG] [–noisolation] [-u {px,in,cm,mm}] [-r RES] [code [code ...]]
Execute code in R, optionally returning results to the Python runtime.
In line mode, this will evaluate an expression and convert the returned value to a Python object. The return value is determined by rpy2’s behaviour of returning the result of evaluating the final expression.
Multiple R expressions can be executed by joining them with semicolons:
In [9]: %R X=c(1,4,5,7); sd(X); mean(X)
Out[9]: array([ 4.25])
In cell mode, this will run a block of R code. The resulting value is printed if it would printed be when evaluating the same code within a standard R REPL.
Nothing is returned to python by default in cell mode:
In [10]: %%R
....: Y = c(2,4,3,9)
....: summary(lm(Y~X))
Call:
lm(formula = Y ~ X)
Residuals:
1 2 3 4
0.88 -0.24 -2.28 1.64
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.0800 2.3000 0.035 0.975
X 1.0400 0.4822 2.157 0.164
Residual standard error: 2.088 on 2 degrees of freedom
Multiple R-squared: 0.6993,Adjusted R-squared: 0.549
F-statistic: 4.651 on 1 and 2 DF, p-value: 0.1638
In the notebook, plots are published as the output of the cell:
%R plot(X, Y)
will create a scatter plot of X bs Y.
If cell is not None and line has some R code, it is prepended to the R code in cell.
Objects can be passed back and forth between rpy2 and python via the -i -o flags in line:
In [14]: Z = np.array([1,4,5,10])
In [15]: %R -i Z mean(Z)
Out[15]: array([ 5.])
In [16]: %R -o W W=Z*mean(Z)
Out[16]: array([ 5., 20., 25., 50.])
In [17]: W
Out[17]: array([ 5., 20., 25., 50.])
The return value is determined by these rules:
-i INPUT, --input INPUT | |
Names of input variable from shell.user_ns to be assigned to R variables of the same names after calling self.pyconverter. Multiple names can be passed separated only by commas with no whitespace. | |
-o OUTPUT, --output OUTPUT | |
Names of variables to be pushed from rpy2 to shell.user_ns after executing cell body and applying ro.conversion.ri2ro. Multiple names can be passed separated only by commas with no whitespace. | |
-n, --noreturn | Force the magic to not return anything. |
Arguments to plotting device
-w WIDTH, --width WIDTH | |
Width of plotting device in R. | |
-h HEIGHT, --height HEIGHT | |
Height of plotting device in R. | |
-p POINTSIZE, --pointsize POINTSIZE | |
Pointsize of plotting device in R. | |
-b BG, --bg BG | Background of plotting device in R. |
SVG specific arguments
--noisolation | Disable SVG isolation in the Notebook. By default, SVGs are isolated to avoid namespace collisions between figures.Disabling SVG isolation allows to reference previous figures or share CSS rules across a set of SVGs. |
PNG specific arguments
-u <{px,in,cm,mm}>, --units <{px,in,cm,mm}> | |
Units of png plotting device sent as an argument to png in R. One of [“px”, “in”, “cm”, “mm”]. | |
-r RES, --res RES | |
Resolution of png plotting device sent as an argument to png in R. Defaults to 72 if units is one of [“in”, “cm”, “mm”]. |
code
%Rpush
A line-level magic for R that pushes variables from python to rpy2. The line should be made up of whitespace separated variable names in the IPython namespace:
In [7]: import numpy as np In [8]: X = np.array([4.5,6.3,7.9]) In [9]: X.mean() Out[9]: 6.2333333333333343 In [10]: %Rpush X In [11]: %R mean(X) Out[11]: array([ 6.23333333])
%Rpull
%Rpull [outputs [outputs ...]]
A line-level magic for R that pulls variables from python to rpy2:
In [18]: _ = %R x = c(3,4,6.7); y = c(4,6,7); z = c('a',3,4)
In [19]: %Rpull x y z
In [20]: x
Out[20]: array([ 3. , 4. , 6.7])
In [21]: y
Out[21]: array([ 4., 6., 7.])
In [22]: z
Out[22]:
array(['a', '3', '4'],
dtype='|S1')
This is useful when a structured array is desired as output, or when the object in R has mixed data types. See the %%R docstring for more examples.
Beware that R names can have ‘.’ so this is not fool proof. To avoid this, don’t name your R objects with ‘.’s...
%Rget
%Rget output
Return an object from rpy2, possibly as a structured array (if possible). Similar to Rpull except only one argument is accepted and the value is returned rather than pushed to self.shell.user_ns:
In [3]: dtype=[('x', '<i4'), ('y', '<f8'), ('z', '|S1')]
In [4]: datapy = np.array([(1, 2.9, 'a'), (2, 3.5, 'b'), (3, 2.1, 'c'), (4, 5, 'e')], dtype=dtype)
In [5]: %R -i datapy
In [6]: %Rget datapy
Out[6]:
array([['1', '2', '3', '4'],
['2', '3', '2', '5'],
['a', 'b', 'c', 'e']],
dtype='|S1')