# #——回声= FALSE,结果= "隐藏 "---------------------------------------------- 美元knitr: opts_chunk集(错误= FALSE,警告= FALSE,消息= FALSE)图书馆(蛇怪)图书馆(BiocStyle ) ## ----------------------------------------------------------------------------- my_env < - BasiliskEnvironment (envname =“my_env_name pkgname =“ClientPackage”,包= c(“熊猫= = 3”、“scikit-learn = = 1.1.1”))second_env < BasiliskEnvironment (envname =“second_env_name pkgname =“ClientPackage”,包= c(“scipy = 1.9.1”、“numpy = = 1.22.1 ") ) ## ---- eval = FALSE -------------------------------------------------------------- # 并行:::setDefaultClusterOptions (setup_strategy = "顺序 ") ## ----------------------------------------------------------------------------- tmp < - createLocalBasiliskEnv(“basilisk-vignette-test”,包= c(“scikit-learn = 1.1.1”、“numpy = 1.22.1 ")) ## ---- 错误= FALSE,消息= FALSE ---------------------------------------------- x < -矩阵(rnorm (1000),ncol=10) basiliskRun(env=tmp, fun=function(mat) {module <- reticulate::import("sklearn.decomposition") runner <- module$TruncatedSVD() output <- runner$fit(mat) output$singular_values_}， mat = x, testload="scipy.optimize") ## ---- error=FALSE, message=FALSE---------------------------------------------- library(reticulate) #在这种情况下，我们将直接使用reticulate来构建我们的conda #环境;尽管我们会欺骗一下，使用basilisk的conda #安装，否则reticulate将尝试安装自己的miniconda。Tmp2 <- file.path(getwd()， " basildisk -vignette-test2") if (!file.exists(Tmp2)) {conda.bin <- file.path ")路径(basilisk.utils: getCondaDir (), basilisk.utils:: getCondaBinary ()) conda_install (tmp2、包= c(“scipy = = 1.9.1”),python_version = " 3.8 ", conda = conda.bin)} basiliskRun (env = tmp2有趣= function(垫){模块< -网状::导入(“scipy.stats”)规范< - - - - - -模块规范标准提供美元(c(1,0, - 1))},垫= x,试验载荷= " scipy.optimize ") ## ----------------------------------------------------------------------------- sessionInfo ()