import rpy2.robjects.constants import rpy2.robjects.conversion as conversion from rpy2.robjects.packages import importr, WeakPackage import copy import warnings NULL = robjects.NULL rlang = importr('rlang', on_conflict='warn') lazyeval = importr('lazyeval', on_conflict='warn') base = importr('base', on_conflict='warn') ggplot2 = importr('ggplot2', on_conflict='warn') ggplot2 = WeakPackage(ggplot2._env, ggplot2.__rname__, translation=ggplot2._translation, exported_names=ggplot2._exported_names, on_conflict="warn", version=ggplot2.__version__, symbol_r2python=ggplot2._symbol_r2python, symbol_check_after=ggplot2._symbol_check_after) TARGET_VERSION = '3.2.0' if ggplot2.__version__ != TARGET_VERSION: warnings.warn('This was designed againt ggplot2 version %s but you ' 'have %s' % (TARGET_VERSION, ggplot2.__version__)) ggplot2_env = robjects.baseenv['as.environment']('package:ggplot2') StrVector = robjects.StrVector def as_symbol(x): return rlang.sym(x)
from rpy2.robjects.packages import (importr, WeakPackage) import warnings with warnings.catch_warnings(): warnings.simplefilter("ignore") dbplyr = importr('dbplyr', on_conflict="warn") dbplyr = WeakPackage(dbplyr._env, dbplyr.__rname__, translation=dbplyr._translation, exported_names=dbplyr._exported_names, on_conflict="warn", version=dbplyr.__version__, symbol_r2python=dbplyr._symbol_r2python, symbol_check_after=dbplyr._symbol_check_after) TARGET_VERSION = '1.2.1' if dbplyr.__version__ != TARGET_VERSION: warnings.warn('This was designed against dbplyr version %s ' 'but you have %s' % (TARGET_VERSION, dbplyr.__version__)) sql = dbplyr.sql
""" import rpy2.robjects as robjects import rpy2.robjects.conversion as conversion from rpy2.rlike.container import OrdDict from rpy2.robjects.packages import importr, WeakPackage NULL = robjects.NULL grid = importr('grid') grid = WeakPackage(grid._env, grid.__rname__, translation=grid._translation, exported_names=grid._exported_names, on_conflict="warn", version=grid.__version__, symbol_r2python=grid._symbol_r2python, symbol_resolve=grid._symbol_resolve) grid_env = robjects.baseenv['as.environment']('package:grid') layout = grid.grid_layout newpage = grid.grid_newpage grill = grid.grid_grill edit = grid.grid_edit get = grid.grid_get remove = grid.grid_remove add = grid.grid_add xaxis = grid.grid_xaxis
from collections import namedtuple from rpy2 import robjects from rpy2.robjects.packages import (importr, WeakPackage) import warnings with warnings.catch_warnings(): warnings.simplefilter("ignore") dplyr_ = importr('dplyr', on_conflict="warn") lazyeval = importr('lazyeval', on_conflict="warn") rlang = importr('rlang', on_conflict='warn', robject_translations={'.env': '__env'}) dplyr = WeakPackage(dplyr_._env, dplyr_.__rname__, translation=dplyr_._translation, exported_names=dplyr_._exported_names, on_conflict="warn", version=dplyr_.__version__, symbol_r2python=dplyr_._symbol_r2python, symbol_resolve=dplyr_._symbol_resolve) TARGET_VERSION = '0.8.' if not dplyr.__version__.startswith(TARGET_VERSION): warnings.warn( 'This was designed againt dplyr versions starting with %s' ' but you have %s' % (TARGET_VERSION, dplyr.__version__)) StringInEnv = namedtuple('StringInEnv', 'string env') def _fix_args_inenv(args, env):
import warnings with warnings.catch_warnings(): warnings.simplefilter("ignore") Matrix_pack = importr('Matrix', on_conflict="warn") TARGET_VERSION = '1.2-' if not Matrix_pack.__version__.startswith(TARGET_VERSION): warnings.warn('This was designed to match Matrix version starting with %s ' 'but you have %s' % (TARGET_VERSION, Matrix_pack.__version__)) Matrix_weakpack = WeakPackage(Matrix_pack._env, Matrix_pack.__rname__, translation=Matrix_pack._translation, exported_names=Matrix_pack._exported_names, on_conflict="warn", version=Matrix_pack.__version__, symbol_r2python=Matrix_pack._symbol_r2python, symbol_resolve=Matrix_pack._symbol_resolve) class RS4Vector(rpy2.robjects.methods.RS4): """Base class for RS4 objects with the behavior of base R vectors.""" def __init__(self, *args, **kwargs): super().__init__(*args, **kwargs) self.ro = vectors.VectorOperationsDelegator(self) self.rx = vectors.ExtractDelegator(self) def _setExtractDelegators(self): self.rx = vectors.ExtractDelegator(self)
The R library provides a low-level coordinate system and graphic primitives to built visualizations. """ import rpy2.robjects as robjects import rpy2.robjects.conversion as conversion from rpy2.rlike.container import OrdDict from rpy2.robjects.packages import importr, WeakPackage NULL = robjects.NULL grid = importr('grid') grid = WeakPackage(grid) grid_env = robjects.baseenv['as.environment']('package:grid') layout = grid.grid_layout newpage = grid.grid_newpage grill = grid.grid_grill edit = grid.grid_edit get = grid.grid_get remove = grid.grid_remove add = grid.grid_add xaxis = grid.grid_xaxis yaxis = grid.grid_yaxis class Unit(robjects.RObject):
import typing import warnings with warnings.catch_warnings(): warnings.simplefilter('ignore') R6_pack = importr('R6', on_conflict='warn') TARGET_VERSION = '2.5.' if not R6_pack.__version__.startswith(TARGET_VERSION): warnings.warn('This was designed to match R6 version starting with %s ' 'but you have %s' % (TARGET_VERSION, R6_pack.__version__)) R6_weakpack = WeakPackage(R6_pack._env, R6_pack.__rname__, translation=R6_pack._translation, exported_names=R6_pack._exported_names, on_conflict='warn', version=R6_pack.__version__, symbol_r2python=R6_pack._symbol_r2python, symbol_resolve=R6_pack._symbol_resolve) dollar = rpy2_R6.utils.dollar # This will map an `rid` (identifier for an R object of class # R6ClassGenerator) to a Python class inheriting from R6. _CLASSMAP = dict() def _static_classmap(clsgenerator: 'R6ClassGenerator') -> typing.Type['R6']: return _CLASSMAP.get(clsgenerator.rid, R6)
""" Mapping of the R library "grDevices" for graphical devices """ import io import os import tempfile from contextlib import contextmanager from rpy2.robjects.packages import importr, WeakPackage grdevices = importr('grDevices') grdevices = WeakPackage(grdevices) # non-interactive file devices png = grdevices.png jpeg = grdevices.jpeg bmp = grdevices.bmp tiff = grdevices.tiff svg = grdevices.svg postscript = grdevices.postscript pdf = grdevices.pdf cairo_pdf = grdevices.cairo_pdf # X11 = grdevices.X11 # OS X quartz = grdevices.quartz
from collections import namedtuple from rpy2 import robjects from rpy2.robjects.packages import (importr, WeakPackage) import warnings with warnings.catch_warnings(): warnings.simplefilter("ignore") dplyr_ = importr('dplyr', on_conflict="warn") lazyeval = importr('lazyeval', on_conflict="warn") rlang = importr('rlang', on_conflict='warn', robject_translations={'.env': '__env'}) dplyr = WeakPackage(dplyr_) TARGET_VERSION = '0.8.' if not dplyr.__version__.startswith(TARGET_VERSION): warnings.warn( 'This was designed againt dplyr versions starting with %s' ' but you have %s' % (TARGET_VERSION, dplyr.__version__)) StringInEnv = namedtuple('StringInEnv', 'string env') def _fix_args_inenv(args, env): """Use R's lazyeval::as_lazy to evaluate each argument in a sequence as code in an environment.""" args_inenv = list() for v in args: if isinstance(v, StringInEnv): args_inenv.append(lazyeval.as_lazy(v.string, env=v.env))
from rpy2.robjects.packages import (importr, WeakPackage) import warnings with warnings.catch_warnings(): warnings.simplefilter("ignore") dbplyr = importr('dbplyr', on_conflict="warn") dbplyr = WeakPackage(dbplyr) TARGET_VERSION = '1.4.2' if dbplyr.__version__ != TARGET_VERSION: warnings.warn('This was designed against dbplyr version %s ' 'but you have %s' % (TARGET_VERSION, dbplyr.__version__)) sql = dbplyr.sql
import rpy2.robjects as robjects import rpy2.robjects.constants import rpy2.robjects.conversion as conversion from rpy2.robjects.packages import importr, WeakPackage import copy import warnings NULL = robjects.NULL rlang = importr('rlang', on_conflict='warn', robject_translations={'.env': '__env'}) lazyeval = importr('lazyeval', on_conflict='warn') base = importr('base', on_conflict='warn') ggplot2 = importr('ggplot2', on_conflict='warn') ggplot2 = WeakPackage(ggplot2) TARGET_VERSION = '3.3.' if not ggplot2.__version__.startswith(TARGET_VERSION): warnings.warn( 'This was designed againt ggplot2 versions starting with %s but you ' 'have %s' % (TARGET_VERSION, ggplot2.__version__)) ggplot2_env = robjects.baseenv['as.environment']('package:ggplot2') StrVector = robjects.StrVector def as_symbol(x): return rlang.sym(x)