在shinyapp.io中编译C++代码

Question

我有一个 C++ 代码（在文本文件中打印“hello world！”的 hello world 代码）。

#include <iostream>
#include <fstream>
using namespace std;
int main(int argc, const char * argv[]) {
// insert code here...
ofstream myfile;
myfile.open ("Hello_World.txt");
myfile << "Hello World! This is a test.\n";
myfile.close();
return 0;
}

我想看看是否可以在shinyapp.io上编译我的C++代码，然后在服务器上执行编译后的文件并获取“Hello_World.txt”文件？如果没有，我应该如何在本地计算机上编译代码，以便在将编译后的代码传输到服务器上后可以在shinyapp.io中执行？

我更关心这种方法（在本地计算机上编译 Fortran 或 C++ 代码并在shinyapp.io 上运行）。我的目标是将来扩展该方法以处理更复杂的代码。

Answer 1

您可以毫无问题地编译cpp文件，查看您的代码被shinyapp.io采用和部署：

app.R：

library(Rcpp)
library(shiny)

Rcpp::sourceCpp("test_rcpp.cpp")


shiny::shinyApp(

  ui = fluidPage(
    titlePanel(hello()),
    sidebarLayout(
      sidebarPanel("content of Hello_world.txt"),
      mainPanel(readChar("Hello_World.txt", file.info("Hello_World.txt")$size))
    )
  ),
  server = function(input, output, session) {
  }
)

test_rcpp.cpp：

#include <Rcpp.h>
#include <iostream>
#include <fstream>
using namespace Rcpp;
using namespace std;

// This is a simple example of exporting a C++ function to R. You can
// source this function into an R session using the Rcpp::sourceCpp 
// function (or via the Source button on the editor toolbar). Learn
// more about Rcpp at:
//
//   http://www.rcpp.org/
//   http://adv-r.had.co.nz/Rcpp.html
//   http://gallery.rcpp.org/
//

// [[Rcpp::export]]
CharacterVector hello() {
  ofstream myfile;
  myfile.open ("Hello_World.txt");
  myfile << "Hello World! This is a test.\n";
  myfile.close();
  return "Hello, World is saved";
;
}


// You can include R code blocks in C++ files processed with sourceCpp
// (useful for testing and development). The R code will be automatically 
// run after the compilation.
//

/*** R
*/

输出：

Answer 2

更新：

我终于能够在shinyapp.io上执行编译后的代码了。文件权限存在错误，我曾经在shinyapp.io日志上收到

permission denied

错误。直到我发现我需要在shinyapp.io上执行期间在server.R上（使用

system()

命令）设置编译代码的权限，而不是在我的本地计算机上。谢谢大家的意见。

Answer 3

您能否详细解释一下如何解决权限问题？我正在尝试执行 C++ 编译的文件。我可以在本地运行它，但不能在闪亮的应用程序上运行。