我有两个浮点数向量x和y,我想计算它们之间的Pearson相关系数。由于我需要对大量数据进行操作(例如10百万个不同的向量x和20千个不同的向量y),因此我使用C++编程语言,更具体地说是GSL中的gsl_stats_correlation函数。
以下是我的C++代码:
我错过了什么?
以下是我的C++代码:
#include <iostream>
#include <vector>
using namespace std;
#include <gsl/gsl_vector.h>
#include <gsl/gsl_statistics.h>
int main (int argc, char ** argv)
{
vector<double> x, y;
size_t n = 5;
x.push_back(1.0); y.push_back(1.0);
x.push_back(3.1); y.push_back(3.2);
x.push_back(2.0); y.push_back(1.9);
x.push_back(5.0); y.push_back(4.9);
x.push_back(2.0); y.push_back(2.1);
for(size_t i=0; i<n; ++i)
printf ("x[%ld]=%.1f y[%ld]=%.1f\n", i, x[i], i, y[i]);
gsl_vector_const_view gsl_x = gsl_vector_const_view_array( &x[0], x.size() );
gsl_vector_const_view gsl_y = gsl_vector_const_view_array( &y[0], y.size() );
double pearson = gsl_stats_correlation( (double*) gsl_x.vector.data, sizeof(double),
(double*) gsl_y.vector.data, sizeof(double),
n );
printf ("Pearson correlation = %f\n", pearson);
return 0;
}
它成功编译(gcc -Wall -g pearson.cpp -lstdc++ -lgsl -lgslcblas -o pearson),但当我运行它时,输出如下:
x[0]=1.0 y[0]=1.0
x[1]=3.1 y[1]=3.2
x[2]=2.0 y[2]=1.9
x[3]=5.0 y[3]=4.9
x[4]=2.0 y[4]=2.1
Pearson correlation = 1.000000
以下是R代码,显然结果不应该完全为1:
x <- c(1.0,3.1,2.0,5.0,2.0); y <-c(1.0,3.2,1.9,4.9,2.1)
cor(x, y, method="pearson") # 0.99798
我错过了什么?
(double*)
转换,但如果你需要它(也许你使用的是与我不同的gsl版本),你应该考虑使用static_cast<double*>
。 - Ben Hocking