The R Project SVN R-packages

Rev

Rev 6392 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed 

/*
 * The error function for anova splitting
 */
double
anovapred(double *y, double *yhat)
{
    double temp = y[0] - *yhat;
    return temp * temp;
}