c_sum2.c

Go to the documentation of this file.

/*!
   \file cluster/c_sum2.c
 
   \brief Cluster library - Sum of squares
 
   SPDX-FileCopyrightText: 2001-2009 GRASS Development Team
   SPDX-License-Identifier: GPL-2.0-or-later
 
   \author Original author CERL
 */
 
#include <grass/cluster.h>
 
/*!
   \brief Compute sum of squares for each class
 
   \param C pointer to Cluster structure
 
   \return 0
 */
int I_cluster_sum2(struct Cluster *C)
{
    int p, band, class;
    double q;
 
    G_debug(3, "I_cluster_sum2(npoints=%d,nclasses=%d,nbands=%d)", C->npoints,
            C->nclasses, C->nbands);
 
    for (class = 0; class < C->nclasses; class++)
        for (band = 0; band < C->nbands; band++)
            C->sum2[band][class] = 0;
 
    for (p = 0; p < C->npoints; p++) {
        class = C->class[p];
        if (class < 0)
            continue;
        for (band = 0; band < C->nbands; band++) {
            q = C->points[band][p];
            C->sum2[band][class] += q * q;
        }
    }
 
    return 0;
}