重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

C++调用Matlab函数求特征值

最近需要用到C++和Matlab的混编,记录一下学习过程。

因为努力和真诚,有更多的客户和我们聚集在一起,为了共同目标,成都创新互联在工作上密切配合,从创业型企业到如今不断成长,要感谢客户对我们的高要求,让我们敢于面对挑战,才有今天的进步与发展。从网站到重庆小程序开发,软件开发,成都App定制开发,十余年企业网站建设服务经验,为企业提供网站设计,网站托管运营一条龙服务.为企业提供营销型网站,专业公司,原创设计,十余年品质,值得您的信赖.

要实现的是调用Matlab函数,求矩阵前k个最小的特征值及其特征向量。

//C++
 
#include "engine.h" //使用Matlab引擎需要包含的头文件
#include 
using namespace std;
int main()
{
 Engine *m_engine; //创建Matlab引擎
 m_engine = NULL; //初始化引擎
 
 if((!m_engine && !(m_engine = engOpen(NULL)))) //打开引擎,此时会打开一个Matlab命令行窗口
 {
  return -1;
 }
 engSetVisible(m_engine,1); //将命令行窗口设为可见
 
 char buffer[255]; //记录调试信息,方便调试
 engOutputBuffer(m_engine, buffer, 255); 
 
 
 double A[3][3] = {-1,1,0,
   -4,3,0,
    1,0,2}; 
 mxArray* AObj = mxCreateDoubleMatrix(3, 3, mxREAL); //创建Matlab的矩阵(大小3*3,实数)
 
 memcpy(mxGetPr(AObj), A, 3*sizeof(double)); //将C++的数据传入Matlab中
 
 engPutVariable(m_engine, "A", AObj); //将AObj的值赋给A
 
  engEvalString(m_engine, "cd('E:\\MatlabScripts')"); //进入Matlab代码的路径 
 
  //调用Matlab中定义的函数“computeEigens”,文件名需与函数名一致,即“computeEigens.m”
  int k = 2;
 engEvalString(m_engine, "[eigVector,eigValue] = computeEigens(A, k);"); 
 
  //存储计算结果
 engEvalString(m_engine,"save('E:\\eigVec_eigV.mat','eigVector','eigValue');");
 
 printf("%s", buffer);
 
 mxDestroyArray(AObj); //销毁Matlab数组
 
 if (m_engine) //关闭Matlab引擎
 {
 engClose(m_engine);
 m_engine = NULL;
 }
 
 return 0;
 
}
%调用的Matlab代码
%E:\MatlabScripts\computeEigens.m
 
function [ eigVector, eigValue ] = computeEigens( M, n_Eigens ) %n_Eigens为要求的特征值数量
 [EigenVectors,EigenValues] = eig(M);
 [sortedEigenValues, index] = sort(diag(EigenValues));
 eigValue = sortedEigenValues(1:n_Eigens);
 idx = index(1:n_Eigens);
 eigVector = EigenVectors(:,idx);
 
end

求稀疏矩阵的特征值

后来发现eig不能用于求解稀疏矩阵,会报“Error using eig”的错,要改用eigs(A, k, sigma),sigma='sm'时表示求稀疏矩阵A的前k个绝对值最小的特征值及其特征向量。sigma的其他取值含义为:'lm' 绝对值最大的特征值;'sm' 绝对值最小的特征值;'la'最的大特征值;'sa'最小的特征值;'lr' 最大实部;'sr' 最小实部;'li' 最大虚部;'si'最小虚部。

以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持创新互联。


当前名称:C++调用Matlab函数求特征值
标题链接:http://cqcxhl.cn/article/gcsoje.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP