biuR

An extract of the BIU R functionality, without any dependency on biu.

Install

pip install biuR

How to use

import biur.wrapper
import matplotlib.pylab as plt
import pandas as pd

R = biur.wrapper.R()

Push some data

R.push(n=5000, mean=10, var=6, question="How many apples do you eat per day?")

Run some commands

R("""
    dist <- rnorm(n, mean, var)
    print(mean(dist))
""", get=False)

[1] 9.883113

Get some data

dist = R.get("dist")
dist_alt = R("dist", get=True) # the get parameter is True by default
_ = plt.hist(dist, bins=50)

Do it all at the same time

dist = R("""rnorm(n, mean, var)""",
         push=dict(n=5000, mean=10, var=6, question="How many apples do you eat per day?"))
_ = plt.hist(dist, bins=50)

Dataframes also work as expected

df  = pd.DataFrame(dist.reshape(500,10), columns=["C%d" % (i+1) for i in range(10)])
df2 = R("""df*2""", push=dict(df=df))
df2.describe()

.dataframe tbody tr th {
    vertical-align: top;
}

.dataframe thead th {
    text-align: right;
}

Some additional stuff

Dates

from datetime import datetime
R("""print(today)""", push=dict(today=datetime.today()), get=False)

[1] "2021-11-15 14:59:14 EET"

Dictionaries

Note that individual numbers do not exist in R (everything is a vector) so it is impossible to transform this back perfectly.

R.push(mydict={"A":10, "B":20, "C":40})
R("""
    mydict$D <- 60
    mydict""")

{'A': [10], 'B': [20], 'C': [40], 'D': [60.0]}