+double solexa_str_mean( char *scores )
+{
+ /* Martin A. Hansen, November 2009 */
+
+ /* Calculates the mean score as a float which is retuned. */
+
+ int len = 0;
+ int i = 0;
+ int sum = 0;
+ double mean = 0.0;
+
+ len = strlen( scores );
+
+ for ( i = 0; i < len; i++ ) {
+ sum += solexa2dec( scores[ i ] );
+ }
+
+ mean = ( double ) sum / ( double ) len;
+
+ return mean;
+}
+
+