 |
随机变量的抽样值产生的实际做法通常是，首先产生一个[0，1]区间的、连续的、均匀分布的随机数，然后通过某种变换和运算产生其所需要的随机变量。VB自身的Rnd函数可以产生[0, 1)之间的随机数，
在此基础上，可以得到其他分布的序列。反变换法是最常用的得到方法，反变换法以概率积分反变换法则为基础，设随机变量X的分布函数为F（X）；μ是[0，1]区间均匀分布的随机数，利用反分布函数
X=F-1(μ)。这方面的内容在建模仿真方面的书中讨论的比较多。
某些分布有快速算法，如下面就是一个利用Box-Muller变换得到高斯分布的例子（来自http://www.adit.co.uk/html/random_numbers.html）：
Private Function GetGausse() As Double
'This Function returns a standard Gaussian random number
'based upon the polar form of the Box-Muller transform
Dim Work1 As Double, Work2 As Double, Work3 As Double
Const Two = 2#, One = 1#
Work3 = Two
Do Until Work3 < One
Work1 = Two * Rnd - One
Work2 = Two * Rnd - One
Work3 = Work1 * Work1 + Work2 * Work2
Loop
Work3 = Sqr((-(Two) * Log(Work3)) / Work3)
GetGausse = Work1 * Work3
'a second valid value could be returned by Work2 * Work3
End Function
 相关问题：
QA004497 "是否有一种算法能得知它的下一个随机数是多少"
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, 其他方面, 。
|
能不能让VB产生按照一定概率分布的数据呢
