Question

我刚刚开始尝试使用Rcpp软件包，所以请耐心等待我。

我阅读了Rcpp小插曲，并尝试了Rcpp文档中的一些示例。现在，我以为我将从GLFW libray（用C编写的库）包装一些函数开始。

所以我想我将从函数glfwInit开始。我在名为pixel的程序包中编写了这个简单的cpp源文件，将其包装在名称glfw_init下：

#include <Rcpp.h>
#include <GLFW/glfw3.h>
using namespace Rcpp;


//' @export
// [[Rcpp::export]]
int glfw_init() {

  return(glfwInit());
}

我正在RStudio工作，使用通常的冲洗和重复周期来生成文档并构建软件包（我正在使用roxygen2）。

该函数将导出到R和用户空间，因此，如果在R控制台中键入glfw_init，则会得到：

function() {
    .Call('_pixel_glfw_init', PACKAGE = 'pixel')
}
<bytecode: 0x5558ece6f398>
<environment: namespace:pixel>

但是，如果我尝试使用glfw_init()运行它并收到错误消息：

Error in .Call("_pixel_glfw_init", PACKAGE = "pixel") : 
  "_pixel_glfw_init" not available for .Call() for package "pixel"

我觉得我缺少一些次要的设置细节，无法正常工作...感谢您的帮助！

P.S .：根据Konrad的评论，我将在RStudio的构建窗格中获得的输出发布在这里：

==> Rcpp::compileAttributes()

* Updated R/RcppExports.R

==> R CMD INSTALL --no-multiarch --with-keep.source pixel

g++ -std=gnu++11 -I"/usr/include/R/" -DNDEBUG  -I"/home/rmagno/R/x86_64-pc-linux-gnu-library/3.6/Rcpp/include" -D_FORTIFY_SOURCE=2  -fpic  -march=x86-64 -mtune=generic -O2 -pipe -fstack-protector-strong -fno-plt  -c glfw.cpp -o glfw.o
* installing to library ‘/home/rmagno/R/x86_64-pc-linux-gnu-library/3.6’
* installing *source* package ‘pixel’ ...
** using staged installation
** libs
g++ -std=gnu++11 -shared -L/usr/lib64/R/lib -Wl,-O1,--sort-common,--as-needed,-z,relro,-z,now -o pixel.so RcppExports.o glfw.o -L/usr/lib64/R/lib -lR
installing to /home/rmagno/R/x86_64-pc-linux-gnu-library/3.6/00LOCK-pixel/00new/pixel/libs
** R
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
** building package indices
** testing if installed package can be loaded from temporary location
** checking absolute paths in shared objects and dynamic libraries
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
* DONE (pixel)

P.S.2：这是我的名字空间：

# Generated by roxygen2: do not edit by hand

export(coords_rectangle)
export(coords_rectangular_lattice)
export(coords_segment)
export(coords_square)
export(display_matrix_int)
export(glfw_init)
export(lgl_matrix_to_coords_grid_segment)
export(lgl_matrix_to_coords_segment)
export(palette_for_quads)

P.S.3：创建新文件R/pixel.R之后：

#' @useDynLib pixel, .registration = TRUE
#' @importFrom Rcpp sourceCpp
NULL

当我尝试生成文档时，我得到了这个错误：

==> Rcpp::compileAttributes()

* Updated R/RcppExports.R

==> devtools::document(roclets = c('rd', 'collate', 'namespace'))

Updating pixel documentation
Loading pixel
Error in dyn.load(dllfile) : 
  unable to load shared object '/home/rmagno/sci/code/R/pkg/pixel/src/pixel.so':
  /home/rmagno/sci/code/R/pkg/pixel/src/pixel.so: undefined symbol: glfwInit
Calls: suppressPackageStartupMessages ... <Anonymous> -> load_dll -> library.dynam2 -> dyn.load
Execution halted

Exited with status 1.

Answer 1

新错误表明您没有将C ++代码链接到GLFW库。您需要提供一个src/Makevars文件，将库添加到PKG_LIBS。请参见编写R扩展手册中的Using Makevars。

错误：此功能不适用于包X

1 个答案: