Matlab生成哈达玛矩阵的C语言实现

版权声明:转载请注明作者和出处。 https://blog.csdn.net/LQMIKU/article/details/79091030

Matlab生成哈达玛矩阵函数hadamard()的C语言实现

  • matlab源代码
  • C语言实现

阅读之前注意:

本文阅读建议用时:34min
本文阅读结构如下表:

项目 下属项目 测试用例数量
Matlab源代码 1
C语言实现 1

Matlab源代码

参考以下代码1

function H = hadamard(n,classname)
%HADAMARD Hadamard matrix.
%   HADAMARD(N) is a Hadamard matrix of order N, that is,
%   a matrix H with elements 1 or -1 such that H'*H = N*EYE(N).
%   An N-by-N Hadamard matrix with N > 2 exists only if REM(N,4)=0.
%   This function handles only the cases where N, N/12 or N/20
%   is a power of 2.
%
%   HADAMARD(N,CLASSNAME) produces a matrix of class CLASSNAME.
%   CLASSNAME must be either 'single' or 'double' (the default).

%   Nicholas J. Higham
%   Copyright 1984-2005 The MathWorks, Inc.

%   Reference:
%   S. W. Golomb and L. D. Baumert, The search for Hadamard matrices,
%   Amer. Math. Monthly, 70 (1963) pp. 12-17.

if nargin < 2, classname = 'double'; end

[f,e] = log2([n n/12 n/20]);
k = find(f==1/2 & e>0);
if min(size(n)) > 1 || isempty(k)
   error(message('MATLAB:hadamard:InvalidInput'));
end
e = e(k)-1;

if k == 1        % N = 1 * 2^e;
   H = ones(classname);

elseif k == 2    % N = 12 * 2^e;
   H = [ones(1,12,classname); ones(11,1,classname) ...
        toeplitz([-1 -1 1 -1 -1 -1 1 1 1 -1 1],[-1 1 -1 1 1 1 -1 -1 -1 1 -1])];

elseif k == 3    % N = 20 * 2^e;
   H = [ones(1,20,classname); ones(19,1,classname)   ...
        hankel([-1 -1 1 1 -1 -1 -1 -1 1 -1 1 -1 1 1 1 1 -1 -1 1], ...
               [1 -1 -1 1 1 -1 -1 -1 -1 1 -1 1 -1 1 1 1 1 -1 -1])];
end

%  Kronecker product construction.
for i = 1:e
    H = [H  H
         H -H]; %#ok
end

C语言实现

此处仅给出哈达玛矩阵列数为2的N次方的实现2

参考以下代码

int ** myHardmard(int n)//仅产生简单的哈达玛矩阵
{
    int i = 0;
    int j = 0;
    int k = 0;
    int findFlag = 0;
    int finalI = 0;
    int nLimit = (int)pow(2.0, 10.0);
    if (n>nLimit)
    {
        printf("无法产生那么大的哈达玛矩阵,请手动关闭本程序\n");
        system("pause");
    }
    for (i = 0; i <= 10; i++)
    {
        if (n == myPow(2,i))
        {
            findFlag = 1;
            finalI = i;
            break;
        }
    }
    if (findFlag != 1)
    {
        printf("你输入的哈达玛矩阵列数n不是2的N次方,请手动关闭本程序\n");
        system("pause");
    }
    int **H = (int **)malloc(n*sizeof(int *));
    for (i = 0; i < n; i++)
        H[i] = (int *)malloc(n*sizeof(int));
    int row = myPow(2, finalI);
    int col = row;
    for (i = 0; i < row; i++)
    {
        for (j = 0; j < col; j++)
        {
            if (i == 0 && j == 0)
                H[i][j] = 1;
            else for (k = 0; k <= 10; k++)
            {
                int tmpLimit = myPow(2, k);
                if ((i >= tmpLimit) && (j >= tmpLimit))
                {
                    H[i][j] = -H[i - tmpLimit][j - tmpLimit];
                    //break;
                }
                if ((i >= tmpLimit) && (j < tmpLimit))
                {
                    H[i][j] = H[i - tmpLimit][j];
                    //break;
                }
                if ((i<tmpLimit) && (j >= tmpLimit))
                {
                    H[i][j] = H[i][j - tmpLimit];
                    //break;
                }
            }
        }
    }
    printf("生成的哈达玛矩阵是:\n");
    for (i = 0; i < row; i++)
    {
        for (j = 0; j < col; j++)
        {
            printf("%-3d ", H[i][j]);
        }
        printf("\n");
    }
    printf("\n");
    return H;
}

事实上,以上代码还可以拓展和简化,功能上已经实现基本的哈达玛矩阵了。改进算法将在以后添加。


  1. 源代码来源于matlab R2016a
  2. 本次函数改写源于一种图像恢复算法的需求

猜你喜欢

转载自blog.csdn.net/LQMIKU/article/details/79091030