使用GSL进行矩阵乘法

时间:2016-11-18 23:38:53

标签: c matrix matrix-multiplication blas gsl

我有两个GSL矩阵ATA

gsl_matrix *A;    /* coefficient matrix A     */
gsl_matrix *AT;   /* coefficient matrix A'    */

AT   = gsl_matrix_alloc(nc, nr); /* Data matrix */
A    = gsl_matrix_alloc(nr, nc); /* Data matrix */

/* Initialize A */
for(i = 0; i < nr; i++){
  gsl_matrix_set(A, i, 0, 1.0); 
}

for(i = 0; i < nr; i++){
  for(j = 1; j < nc; j++){
    gsl_matrix_set(A, i, j, 1.0 / (double)(i + j + 1)); 
  }
}

gsl_matrix_transpose_memcpy(AT, A); 

我想将这些矩阵相乘并将结果存储在矩阵ATA中,但我无法理解GSL BLAS文档。

我初始化了ATA矩阵:

gsl_matrix *ATA;  /* coefficient matrix A'A   */
ATA  = gsl_matrix_alloc(nc, nc); /* Data matrix */  

我看到我可以使用gsl_blas_zgemm来复用复数矩阵,但这些矩阵并不复杂。我该怎么做呢?

更新

我试过了:

gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, A, AT, 0.0, ATA); 

导致以下错误:

  

gsl:blas.c:1354:错误:长度无效   调用了默认的GSL错误处理程序。   中止(核心倾销)

1 个答案:

答案 0 :(得分:1)

我正在向后增加矩阵。正确的路线是:

gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, AT, A, 0.0, ATA);