r - 使用 R 配置 MKL

Question

我在使用 触发线程时遇到问题R 使用 MKL 图书馆。我目前使用的是 Ubuntu 18.04.2 LTS。

Linux pedro-HP-EliteOne-800-G1-AiO 4.18.0-15-generic #16~18.04.1-Ubuntu SMP Thu Feb 7 14:06:04 UTC 2019 x86_64 x86_64 x86_64 GNU/Linux

r-open$ screenfetch 
                          ./+o+-       pedro@pedro-HP-EliteOne-800-G1-AiO
                  yyyyy- -yyyyyy+      OS: Ubuntu 18.04 bionic
               ://+//////-yyyyyyo      Kernel: x86_64 Linux 4.18.0-15-generic
           .++ .:/++++++/-.+sss/`      Uptime: 19h 27m
         .:++o:  /++++++++/:--:/-      Packages: 1834
        o:+o+:++.`..```.-/oo+++++/     Shell: bash
       .:+o:+o/.          `+sssoo+/    Resolution: 1920x1080
  .++/+:+oo+o:`             /sssooo.   DE: GNOME 
 /+++//+:`oo+o               /::--:.   WM: GNOME Shell
 \+/+o+++`o++o               ++////.   WM Theme: Adwaita
  .++.o+++oo+:`             /dddhhh.   GTK Theme: Ambiance [GTK2/3]
       .+.o+oo:.          `oddhhhh+    Icon Theme: ubuntu-mono-dark
        \+.++o+o``-````.:ohdhhhhh+     Font: Ubuntu 11
         `:o+++ `ohhhhhhhhyo++os:      CPU: Intel Core i5-4590S @ 4x 3.7GHz [27.8°C]
           .o:`.syhhhhhhh/.oo++o`      GPU: intel
               /osyyyyyyo++ooo+++/     RAM: 2659MiB / 7867MiB
                   ````` +oo+++o\:    
                          `oo++.      

备注 : 我的机器有 4核 .

最初我下载了文件 l_mkl_2019.2.187.tgz 在英特尔网站上并为 /home/pedro/ 做了安装.后来我下载了 R-3.5.2.tar.gz编译文件 R 多线程 MKL 支持。我通过以下方式执行编译:

source /home/pedro/intel/mkl/bin/mklvars.sh intel64
cd /home/pedro/Downloads/R-3.5.2 && ./configure --enable-R-shlib --enable-threads=posix --with-lapack --with-blas="-fopenmp -m64 -I$MKLROOT/include -L$MKLROOT/lib/intel64 -lmkl_gf_lp64 -lmkl_gnu_thread -lmkl_core -lpthread -lm"
make
make install

显然，编译没有任何问题。使用 sessionInfo()命令我有以下结果:

> sessionInfo()
R version 3.5.2 (2018-12-20)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 18.04.2 LTS

Matrix products: default
BLAS/LAPACK: /home/pedro/intel/compilers_and_libraries_2019.2.187/linux/mkl/lib/intel64_lin/libmkl_gf_lp64.so

locale:
 [1] LC_CTYPE=pt_BR.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=pt_BR.UTF-8        LC_COLLATE=pt_BR.UTF-8    
 [5] LC_MONETARY=pt_BR.UTF-8    LC_MESSAGES=pt_BR.UTF-8   
 [7] LC_PAPER=pt_BR.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=pt_BR.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

loaded via a namespace (and not attached):
[1] compiler_3.5.2

基本上，我正在尝试使用 parallel :: mclapply 并行化蒙特卡罗模拟。功能。事实是，连续(1 个核心)我使用 获得了更好的结果。 MKL 但是在尝试并行化时，我意识到在 4 个内核中没有触发线程。

我用函数做了什么 parallel::mclapply曾是:
parallel::mclapply(1:8, FUN = function(x) func_metodos(), mc.cores = 4)) ，其中 func_metodos()是我在 中实现的功能R 并想重复8次。

备注 : 除了使用 之外，我想要一个解决方案微软 R 打开 .我不喜欢使用微软指手画脚的东西。

此致。

Answer 1

我详细介绍了

在 this blog post

基于 this repo 中的脚本.

正如我在那里演示的那样，这可以完全自动化。我可以添加更多颜色，但我现在必须运行...