我应该如何将数据传递给mexFunction的mxArray * plhs []以便在Matlab中获取其输出?

时间:2016-08-29 16:27:13

标签: matlab visual-studio visual-c++ mex matlab-compiler

我希望有一个预编译函数,如果它有任何正根,则返回二次方程的最大正实根,如果不是则返回0.我正在使用一些遥感数据,我已经做了一些测试,现在在我的情况下,所有二次多项式都有真正的根,但不能确定它们的符号。所以我写了以下C源代码。

/*
 * mx_solve_quadratic.cpp
 *
 * Solves for real roots of the standard quadratic equation
 *
 * The calling syntax is:
 *
 *      MaxRoot = mx_solve_quadratic(coefficientMatrix)
 *
 * This is a MEX file for MATLAB.
*/


#include <math.h>
#include "mex.h"
#include "matrix.h"



int gsl_poly_solve_quadratic (double , double , double , double *, double *);

/* The gateway function */
void mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
{
  double a; /* coefficient for x^2 */
  double b; /* coefficient for x */
  double c; /* coefficient for 1 */
  double x0; /* the smaller root */
  double x1; /* the bigger root */
  double *inMatrix = NULL;
  inMatrix = mxGetPr(prhs[0]);
  a = inMatrix[0];
  b = inMatrix[1];
  c = inMatrix[2];
  int i = gsl_poly_solve_quadratic(a,b,c,&x0,&x1);
  double signRoot = (x1 > 0 ? x1 : 0);
  mxSetPr(plhs[0], &signRoot);
}


int gsl_poly_solve_quadratic (double a, double b, double c, double *x0, double *x1)
{
  if (a == 0) /* Handle linear case */
    {
      if (b == 0)
        {
          return 0;
        }
      else
        {
          *x0 = -c / b;
          return 1;
        };
    }

  {
    double disc = b * b - 4 * a * c;

    if (disc > 0)
      {
        if (b == 0)
          {
            double r = sqrt (-c / a);
            *x0 = -r;
            *x1 =  r;
          }
        else
          {
            double sgnb = (b > 0 ? 1 : -1);
            double temp = -0.5 * (b + sgnb * sqrt (disc));
            double r1 = temp / a ;
            double r2 = c / temp ;

            if (r1 < r2) 
              {
                *x0 = r1 ;
                *x1 = r2 ;
              } 
            else 
              {
                *x0 = r2 ;
                  *x1 = r1 ;
              }
          }
        return 2;
      }
    else if (disc == 0) 
      {
        *x0 = -0.5 * b / a ;
        *x1 = -0.5 * b / a ;
        return 2 ;
      }
    else
      {
        return 0;
      }
  }
}

实际上我希望signRoot作为标量值返回MATLAB。我调试了两次代码:

a=[1 3 2];
b=mx_solve_quadratic(a)

enter image description here

a=[1 -3 2];
b=mx_solve_quadratic(a)  

enter image description here

我看到一切正常,直到最后一行,我想传递signRoot作为输出。如果我按F10,我会收到错误:

enter image description here

或者如果我尝试在没有调试的情况下在MATLAB中运行mex函数,我会得到:

enter image description here

1 个答案:

答案 0 :(得分:2)

Suever是对的。您正在尝试传递在C中创建的数组并将其交给MATLAB,这是一种不明智和未定义的行为。你必须做的是使用任何a class=product-color函数并将内存位置设置为你想要的任何结果。最简单的方法是使用mxCreateDoubleMatrix并指定输出有1行,1列(即标量),并确保输出是真实的。

因此,请执行以下操作来替换mxCreate*中的最后一行代码:

mexFunction

首先在MATLAB端为单个标量分配内存。然后你得到一个指向这个内存的指针,然后相应地设置它。

为了绝对确定我们在同一页面上,这是plhs[0] = mxCreateDoubleMatrix(1, 1, mxREAL); double *out = mxGetPr(plhs[0]); *out = signRoot; 修改后的样子。请注意,更改的行使用mexFunction注释进行引用。

/* NEW */

现在使用两个示例输入运行上面的代码:

/* The gateway function */
void mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
{
  double a; /* coefficient for x^2 */
  double b; /* coefficient for x */
  double c; /* coefficient for 1 */
  double x0; /* the smaller root */
  double x1; /* the bigger root */
  double *inMatrix = NULL;
  inMatrix = mxGetPr(prhs[0]);
  a = inMatrix[0];
  b = inMatrix[1];
  c = inMatrix[2];
  int i = gsl_poly_solve_quadratic(a,b,c,&x0,&x1);
  double signRoot = (x1 > 0 ? x1 : 0);
  plhs[0] = mxCreateDoubleMatrix(1, 1, mxREAL); /* NEW */
  double *out = mxGetPr(plhs[0]); /* NEW */
  *out = signRoot; /* NEW */
}