X=c(1,4,5,7);

%load_ext rpy2.ipython

%R X=c(1,4,5,7); sd(X); mean(X)

X

%%R
Y = c(2,4,3,9)
summary(lm(Y~X))

%R plot(X, Y)

Z = [3, 1, 8, 2]
%R -i Z mean(Z)

%R -o Zm Zm=mean(Z)

Zm[0]