在R中使用Reticulate来使用pyts

Question

我正在尝试理解如何使用网格化的pyts。这个包加载和运行良好，但是我似乎找不到如何将时间序列插入到python块中。我得到以下结果NameError:没有定义名称'x‘。我也不知道如何将X_gasf和X_gadf提取到R中。

require(reticulate); require(tibble)
pyts<- reticulate::import("pyts", convert = TRUE)
pytsImage<-reticulate::import("pyts.image", convert = TRUE)
x <- tibble(values = sin(-10:6))

repl_python()
from pyts.image import GramianAngularField
from sklearn.pipeline import make_pipeline
gasf = GramianAngularField(image_size=17, method='summation')
X_gasf = gasf.fit_transform(x)
gadf = GramianAngularField(image_size=17, method='difference')
X_gadf = gadf.fit_transform(x)
exit

py$X_gasf
py$X_gadf

Answer 1

我想我是通过将变量更改为简单的时间序列并在Python块中插入"r.x“而不是"x”来实现的。也许转置在最后是不必要的，但我必须研究一下。

require(reticulate); require(tibble)
pyts<- reticulate::import("pyts", convert = TRUE)
pytsImage<-reticulate::import("pyts.image", convert = TRUE)
x<-t(as.ts(sin(-10:6)))

repl_python()
from pyts.image import GramianAngularField
from sklearn.pipeline import make_pipeline
gasf = GramianAngularField(image_size=15, method='summation')
X_gasf = gasf.fit_transform(r.x)
gadf = GramianAngularField(image_size=15, method='difference')
X_gadf = gadf.fit_transform(r.x)
exit 

X_GASF<-t(matrix(py$X_gasf,ncol=length(py$X_gasf[,,1])))
X_GADF<-t(matrix(py$X_gadf,ncol=length(py$X_gadf[,,1])))