2012-11-23 91 views
0

使用随机库,这些功能:随机函数,计算百分比

randomChance(p) Returns true with the probability indicated by p.

randomInteger(low, high) Returns a random integer in the range low to high, inclusive.

什么是贯彻落实“随机选择”这需要考虑比例的最简单的方法,1/4或1/3等...我有一个键/值配对阵列。例如,"a" migth的值为2,"b"的值为2. 1/2。

最大值将是数组的大小,因为它只包含唯一项目。 randomChance()函数的范围在0.0 - 1.0之间,其中1 = 100%。如果我的数组大小是4,什么是“让4是1”的最佳方式。

+1

我不明白你在问什么。这个“1/4或1/3等”比例是什么? – melpomene

+0

四分之一的100%= 25% –

回答

1

比方说你有:

a = 2, b = 2, c = 1, d = 3 

现在使它:

a = 2, b = 4, c = 5, d = 8 

从1创建一个随机数MaxVal最大值(最后一个键,8个在这个例子中的值)。选择其中value> = RandomNum

编辑

我做了一个小VB.Net说明了算法和它是如何工作的第一重点。该代码并不意味着:优秀,优雅,高性能或可读。

Module Module1 

    Private Class Value 
     Public vOrg, vRecalc, HitCount As Integer 
     Public Key As String 
     Public Sub New(s, v1, v2, c) 
      Key = s : vOrg = v1 : vRecalc = v2 : HitCount = c 
     End Sub 
    End Class 

    Sub Main() 

     ' set initial values 
     Dim KVP() As Value = {New Value("A", 2, 0, 0), 
           New Value("B", 2, 0, 0), 
           New Value("C", 1, 0, 0), 
           New Value("D", 3, 0, 0)} 
     ' recalc values 
     For i = 0 To KVP.Length - 1 
      If i = 0 Then KVP(0).vRecalc = KVP(0).vOrg Else KVP(i).vRecalc = KVP(i).vOrg + KVP(i - 1).vRecalc 
     Next 
     ' do test 
     Dim r As New Random 
     Dim runs As Integer = 1000 * 1000, maxval As Integer = KVP(KVP.Length - 1).vRecalc 
     For i = 1 To runs 
      Dim RandVal = r.Next(1, maxval + 1) 
      Dim chosen As Integer = (From j In Enumerable.Range(0, KVP.Length) Where KVP(j).vRecalc >= RandVal Take 1 Select j)(0) 
      KVP(chosen).HitCount += 1 
     Next 
     ' ouput results 
     For Each kv In KVP 
      Console.WriteLine("{0} was chosen with {1:F3} propability, expected was {2:F3}", kv.Key, kv.HitCount/CDbl(runs), kv.vOrg/CDbl(maxval)) 
     Next 

     Console.ReadLine() 

    End Sub 

End Module 

输出采样:

A was chosen with 0.250 propability, expected was 0.250 
B was chosen with 0.251 propability, expected was 0.250 
C was chosen with 0.124 propability, expected was 0.125 
D was chosen with 0.375 propability, expected was 0.375 
+0

这很简单,很少代码,我喜欢它。但是,对于maxVal,如果我是正确的,那必须是所有值a,b,c,d(2 + 2 + 1 + 3)的总和。我是否正确,我的数学技能是否让人尴尬? –

+1

MaxVal是最后一个键的值(重新计算后) – igrimpe

+0

@igrimpe:你的解决方案是完全错误的:“c”将以概率4/8选取,这是错误的(应该是1/8) –

1

只是乘以randomChance()结果和数组长度在一起。它会给你指数范围在[0,array_length-1],您可以使用访问数组

array_index = (unsigned int)(randomChance(p) * (array_length - 1)); 

也许你的意思是“让3为1”(而不是4)在你的榜样。长度为4的数组的最后一个索引是3.

+0

好的解决方案,但只适用于平均分配的密钥(每个密钥的机会相同)。当然你可以简单地创建一个从0到maxindex的随机数。 – igrimpe

+0

使它不均匀只是重复多次数组中的值或使randomChange()本身成为非均匀函数 –

+0

'重复多次' - 我不喜欢冗余;) – igrimpe