- design_matrix_create (n_indep,
- (const struct variable **) indep_vars,
- n_data);
- for (i = 0; i < X->m->size2; i++)
- {
- lopts.get_indep_mean_std[i] = 1;
- }
- model = pspp_linreg_cache_alloc (X->m->size1, X->m->size2);
- model->indep_means = gsl_vector_alloc (X->m->size2);
- model->indep_std = gsl_vector_alloc (X->m->size2);
- model->depvar = v_dependent[0];
+ covariance_matrix_create (n_all_vars,
+ (const struct variable **) all_vars);