我有两个GSL矩阵AT
和A
:
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错误处理程序。 中止(核心倾销)
答案 0 :(得分:1)
我正在向后增加矩阵。正确的路线是:
gsl_blas_dgemm(CblasNoTrans, CblasNoTrans, 1.0, AT, A, 0.0, ATA);