在C程序中调用Matlab功能

以下程序在安装Matlab R2008a和Visual C++ 2008 Express Edition软件的Windows XP环境下编译运行成功。

1、在VC++2008中新建空白工程，添加代码文件“main.c”。

2、设置工程属性（快捷键“Alt+F7”），在“Configrration Properties -> C/C++”下的“Additional Include Directories”中添加“C:/Program Files/MATLAB/R2008a/extern/include”（根据Matlab安装的文件夹不同而不同），目的是使编译环境能够找到将要使用的头文件“engine.h”的位置。

3、仍然在工程属性的“Configrration Properties -> Linkers”下的“Additional Library Directories”中添加“C:/Program Files/MATLAB/R2008a/extern/lib/win32/microsoft”，目的是包含两个库文件“libmx.lib”、“libeng.lib”。

4、在工程属性的“Configrration Properties -> Linkers -> Inputs”下的“Additional Dependencies”中添加“libmx.lib libeng.lib”。至此完成工程属性设置。

5、在“main.c”中添加如下代码： #include "engine.h" #include "stdio.h" int main() { int i; Engine * pEng = NULL; mxArray *pD, *pA; pA = mxCreateDoubleMatrix(2, 2, mxREAL); pD = mxCreateDoubleMatrix(2, 1, mxREAL); *(mxGetPr(pA) + 0) = 2; *(mxGetPr(pA) + 1) = 4; *(mxGetPr(pA) + 2) = 7; *(mxGetPr(pA) + 3) = 3; if ((pEng = engOpen(NULL)) == NULL) exit(1); engPutVariable(pEng, "A", pA); engEvalString(pEng, "D = eig(A);"); pD = engGetVariable(pEng, "D"); if (engClose(pEng) != 0) printf("Error occure when close engine! Program abort!"), exit(1); for (i = 0; i < 2; i++) printf("%f/n", *(mxGetPr(pD) + i)); }

该段代码的目的是计算矩阵

2 4

7 3

的特征值。 返回结果应为（这里只列出5位有效数字）

-2.8151

7.8151