Click or drag to resize
RunBasicStatistics Method (String, Int32, Double, Double)
Execute Basic statistics from a list of numeric values already in the clipboard.

Namespace:  Biolomics.BioCallback
Assembly:  Biolomics.BioCallback (in Biolomics.BioCallback.dll) Version: 1.0.0.0 (1.0.0.0)
Syntax
Copy
public static List<string[]> BasicStatistics(
	string p_Value,
	int p_StatisticsFunction,
	double p_LowPercentile,
	double p_HighPercentile
)

Parameters

p_Value
Type: SystemString
The value.
p_StatisticsFunction
Type: SystemInt32
The statistics function.
p_LowPercentile
Type: SystemDouble
The low percentile.
p_HighPercentile
Type: SystemDouble
The high percentile.

Return Value

Type: ListString
The result of statistics.
Examples
Code sample below is a demonstration of how to get some basic statistics from a list of numeric values already in the clipboard.
Example VB.Net
Copy
Imports System
Imports System.Collections
Imports System.Text '    for StringBuilder
Imports Biolomics.BioCallback
Imports Biolomics.SharedClasses
Imports System.Windows.Forms

Public Class Program

    <STAThread()>
    Shared Sub Main()
        Dim program As New Program
        'run the basic stats 
        program.RunStats()
        'run the basic stats with low percentil and high percentil
        program.RunBasicStats()
    End Sub

    Public Sub RunBasicStats()
        Dim StatsType As StatisticsEnum = StatisticsEnum.All

        '    Data should be numeric values separated by TAB, CRLF or by whitespaces
        Dim Values As String = Clipboard.GetText
        '    or something like this for testing purposes: Values = "1" & vbTab & "2" & vbTab & "3" & vbTab & "4" & vbTab & "5" & vbTab & "6" & vbTab & "7" & vbTab & "8" & vbTab & "9"

        Dim Results As Generic.List(Of String) = Run.BasicStatistics(Values, StatsType, 0.1, 0.9)

        Dim strB As New StringBuilder(2048)
        strB.Append("Stats with maximum params " & vbCrLf)
        strB.Append("Minimum: " & Results(0) & vbCrLf)
        strB.Append("Maximum: " & Results(1) & vbCrLf)
        strB.Append("Mean: " & Results(2) & vbCrLf)
        strB.Append("Median: " & Results(3) & vbCrLf)
        strB.Append("LowPercentile: " & Results(4) & vbCrLf)
        strB.Append("HighPercentile: " & Results(5) & vbCrLf)
        strB.Append("Variance: " & Results(6) & vbCrLf)
        strB.Append("StandardDeviation: " & Results(7) & vbCrLf)
        strB.Append("Kurtosis: " & Results(8) & vbCrLf)
        strB.Append("Skewness: " & Results(9) & vbCrLf)
        strB.Append("NumberObservations: " & Results(10) & vbCrLf)

        Console.Write(strB.ToString)
    End Sub

    Public Sub RunStats()
        Dim StatsType As StatisticsEnum = StatisticsEnum.All

        '    Data should be numeric values separated by TAB, CRLF or by whitespaces
        Dim Values As String = Clipboard.GetText
        '    or something like this for testing purposes: Values = "1" & vbTab & "2" & vbTab & "3" & vbTab & "4" & vbTab & "5" & vbTab & "6" & vbTab & "7" & vbTab & "8" & vbTab & "9"

        Dim Results As Generic.List(Of String) = Run.BasicStatistics(Values, StatsType)

        Dim strB As New StringBuilder(2048)
        strB.Append("Stats with minimum params " & vbCrLf)
        strB.Append("Minimum: " & Results(0) & vbCrLf)
        strB.Append("Maximum: " & Results(1) & vbCrLf)
        strB.Append("Mean: " & Results(2) & vbCrLf)
        strB.Append("Median: " & Results(3) & vbCrLf)
        strB.Append("LowPercentile: " & Results(4) & vbCrLf)
        strB.Append("HighPercentile: " & Results(5) & vbCrLf)
        strB.Append("Variance: " & Results(6) & vbCrLf)
        strB.Append("StandardDeviation: " & Results(7) & vbCrLf)
        strB.Append("Kurtosis: " & Results(8) & vbCrLf)
        strB.Append("Skewness: " & Results(9) & vbCrLf)
        strB.Append("NumberObservations: " & Results(10) & vbCrLf)

        Console.Write(strB.ToString)
    End Sub
End Class
See Also