from rpy2 import robjects as robj from rpy2.robjects import Formula, Environment from rpy2.robjects.vectors import IntVector, FloatVector from rpy2.robjects.lib import grid from rpy2.robjects.packages import importr, data from rpy2.rinterface import RRuntimeError from rpy2.robjects import r, pandas2ri import warnings # The R 'print' function # rprint = robjects.globalenv.get("print") stats = importr('stats') grdevices = importr('grDevices') base = importr('base') datasets = importr('datasets') grid.activate() pandas2ri.activate() lattice = importr('lattice') datasets = importr('datasets') mtcars = data(datasets).fetch('mtcars')['mtcars'] formula = Formula('mpg ~ wt') formula.getenvironment()['mpg'] = mtcars.rx2('mpg') formula.getenvironment()['wt'] = mtcars.rx2('wt') # Python import numpy as np xyplot = lattice.xyplot
from rpy2 import robjects from rpy2.robjects import Formula, Environment from rpy2.robjects.vectors import IntVector, FloatVector from rpy2.robjects.lib import grid from rpy2.robjects.packages import importr, data from rpy2.rinterface import RRuntimeError import warnings # The R 'print' function rprint = robjects.globalenv.get("print") stats = importr('stats') grdevices = importr('grDevices') base = importr('base') datasets = importr('datasets') grid.activate() lattice = importr('lattice') grdevices.png(file="test.png", width=512, height=512) # plotting code here #r = robjects.r #x = robjects.IntVector(range(10)) #y = r.rnorm(10) #r.plot(r.runif(10), y, xlab="runif", ylab="foo/bar", col="red") tmpenv = data(datasets).fetch("volcano") volcano = tmpenv["volcano"]