File: variable.c

package info (click to toggle)
chromium 138.0.7204.183-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 6,071,908 kB
  • sloc: cpp: 34,937,088; ansic: 7,176,967; javascript: 4,110,704; python: 1,419,953; asm: 946,768; xml: 739,971; pascal: 187,324; sh: 89,623; perl: 88,663; objc: 79,944; sql: 50,304; cs: 41,786; fortran: 24,137; makefile: 21,806; php: 13,980; tcl: 13,166; yacc: 8,925; ruby: 7,485; awk: 3,720; lisp: 3,096; lex: 1,327; ada: 727; jsp: 228; sed: 36
file content (42 lines) | stat: -rw-r--r-- 847 bytes parent folder | download | duplicates (18) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
 
/* -*- mode: C; c-basic-offset: 2; indent-tabs-mode: nil; -*- */

#include <math.h>
#include "variable.h"

void
variable_init (Variable *variable)
{
  variable->weight = 0.0;
  variable->sum = 0.0;
  variable->sum2 = 0.0;
}

void
variable_add_weighted (Variable *variable,
                       double    value,
                       double    weight)
{
  variable->weight += weight;
  variable->sum += weight * value;
  variable->sum2 += weight * value * value;
}

void
variable_add (Variable *variable,
              double    value)
{
  variable_add_weighted (variable, value, 1.);
}

double
variable_mean (Variable *variable)
{
  return variable->sum / variable->weight;
}

double
variable_standard_deviation (Variable *variable)
{
  double mean = variable_mean (variable);
  return sqrt (variable->sum2 / variable->weight - mean * mean);
}