最新消息:ww12345678 的部落格重装上线,希望大家继续支持。

How to Develop a C++ DLL for R in Visual Studio 2015

网络文摘 William 4989浏览 0评论

The programming language R is great for statistics and analysis. R is becoming more and more relevant for business analysis. Microsoft has already integrated R in SQL Server 2016, Power BI and offers an open source R Implementation and Visual Studio integration. There are many tutorials for C interop with R but most of them use Linux tools and not Visual C++. This is a walkthrough how to build a C++ DLL and use it in R all in Visual Studio.

      Visual C++

      Create a new empty solution in Visual Studio. Add a new Visual C++ Win32 project.

      image

    In the C++ Application dialog, choose a DLL

    image

    A new C++ project is created include a header file and a C++ file.

    image 

    Open the stdafx.h file and add the definition for function foo() in the header file.

    // stdafx.h : include file for standard system include files,
    // or project specific include files that are used frequently, but
    // are changed infrequently
    //

    #pragma once

    #include "targetver.h"

    #define WIN32_LEAN_AND_MEAN             // Exclude rarely-used stuff from Windows headers
    // Windows Header Files:
    #include <windows.h>

    /// export symbols for DLL and specify C naming conventions

    extern "C" __declspec(dllexport) void __cdecl foo(double *in, double *out);

    Open the .cpp file and add the following implementation.

    void foo(double *in, double *out)
    {
        double value = in[0] * 2;
        out[0] = value;
    }

    Make sure to change the architecture to x64 before building.

    image

    Build the solution. The resulting DLL will be outputed in the x64 folder in the project folder(!) not in the Debug folder where a C# DLL would be.

    image

     

    R Project

    Add a new R project to  the solution which already contains the C++ project. Go to the R Interactive Window.

    image

    Load the DLL from your output directory.

    dyn.load(“C:\\PATH_TO\\YOUR.DLL”)

    Declare 2 variables for input and output and assign values. For example input value 21 and a default value 0 for the output variable. Call the DLL function and output the result

    value_in <- 21
    value_out <-0
    .C(“foo”,as.double(value_in),result=as.double(value_out))$result

    The result should look like this

    image


    发表我的评论
    取消评论

    表情

    Hi,您需要填写昵称和邮箱!

    • 昵称 (必填)
    • 邮箱 (必填)
    • 网址