Tag: 随机

如何在Excel中将“频率”实现为随机数生成器？: 假设我有三个项目，每个都有一个1-3的指定频率，其中1为“低”，3为“高”。 Item A – 1 Item B – 2 Item C – 3 在重新计算表单时，我想要一个单元格随机显示这些项目中的一个，但根据它们的频率。（即如果我计算6次，我会期望项目A出现一次，项目B出现两次，项目C出现三次。）理想情况下，我也会强制每次使用随机数唯一的期望值（例如1-6中的每个数字只出现一次）。我有一个可行的解决scheme，但是在将来的工作表中设置起来非常耗时，而且我几乎无法理解它是如何回顾代码的 – 任何人都可以想到一个简洁的方法来做到这一点？（我的解决scheme包括总结频率以确定每个项目的边界（例如，项目C的边界将是4-6），然后将随机数字与该边界进行比较并search适当的项目）

Excel如何从均值和标准差中find真正的随机数据集？: 在Excel中，很容易find10个单一数据点的均值和标准差。但是，如果给出了平均值和标准偏差，是否可以在Excel中生成10个随机数据点？在Excel中，我可以右键单击“查看代码”，并访问macros使用macros编码，但我怎么去编码呢？ Sub rand() Range("B4").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B4").Calculate Range("B4").Value = Range("B4").Value Range("B5").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B5").Calculate Range("B5").Value = Range("B5").Value Range("B6").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B6").Calculate Range("B6").Value = Range("B6").Value Range("B7").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B7").Calculate Range("B7").Value = Range("B7").Value Range("B8").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B8").Calculate Range("B8").Value = Range("B8").Value Range("B9").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B9").Calculate Range("B9").Value = Range("B9").Value Range("B10").Formula = "=NORMINV(RAND(),$B$14,$B$15)" Range("B10").Calculate Range("B10").Value = Range("B10").Value Range("B11").Formula […]

使用Excel随机分配特定值而不重复: 我需要随机分配1000个客户电话号码给25个客户服务代理商，不用重复使用Excel。我曾尝试使用RANDBETWEENfunction，但电话号码是不连续的，而重复的数字。这可以在Excel中实现吗？

在Excel的NORMINV（）上增加样本大小的平均偏差: 我有一个奇怪的行为，我尝试在C编写Excel的NORMINV（）作为norminv（）我从一个math家这个function，这可能是正确的，因为我也尝试不同的结果相同。代码如下： double calculate_probability(double x0, double x1) { return x0 + (x1 – x0) * rand() / ((double)RAND_MAX); } int main() { long double probability = 0.0; long double mean = 0.0; long double stddev = 0.001; long double change_percentage = 0.0; long double current_price = 100.0; srand(time(0)); int runs = 0; long double prob_sum […]

随机化一组值而不重复值索引: 我有一个要求，随机或洗牌A列的单元格受限于没有细胞保持不变的约束。我将这个代码放在列C中的候选人随机化： Sub ShuffleCutandDeal() Dim A As Range, C As Range Dim B As Range, cell As Range Set A = Range("A1:A24") Set B = Range("B1:B24") Set C = Range("C1") A.Copy C Randomize For Each cell In B cell.Value = Rnd() Next cell With ActiveSheet.Sort .SortFields.Clear .SortFields.Add Key:=Range("B1:B24") _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .SetRange Range("B1:C24") […]

Excel VBA按顺序依次生成一个随机数: 天儿真好，我有一个棘手的问题，根据我需要的VBA代码或VBA中的公式，以sorting顺序获得随机数字。这个需求是在1到10之间随机产生的。它看起来像这样，当它开始。这里是我想到的效果，根据示例中的失败次数显示sorting的数字。这是VBA的一个尝试，我做了单元格J7包含我需要的数量的随机数，但数字没有完全sorting。我在这里接受build议/反馈。非常感谢。 Public Const BeCoolMachineCounter As String = "J7" Public Const BeCoolMachineRange As String = "Q03:Q12" 'Generate the random data according to how many needed. Call CreateNumbers(Range(BeCoolMachineRange), Range(BeCoolMachineCounter).Value) Private Sub CreateNumbers(Which As Range, HowMany As Integer) ' Declaration of variables Dim c As Range Dim iCheck As Long iCheck […]

随机细胞在一系列细胞中 – Excel: 我正试图在Excel中实现一个Montecarlo方法。我需要从A1到P4的单元格范围内select一个随机单元格，因为在这个单元格范围内，我有我需要的数字。非常感谢

在VBA中重复随机数字: 我在VBA中有一个蒙特卡洛模拟。客户希望（不要质疑为什么）修复随机数字序列，即每次运行模型时，序列应保持不变。我设法修复这里描述的随机种子。但在不同的电脑上不一样。任何想法为什么以及如何在不同的机器上修复它？

为什么第一个随机数总是一样的？: 我正在研究一个macros，它随机select一系列随机testing的员工ID号。我的代码运行良好，除了返回的第一个数字总是相同的。例如，如果我的身份证号码是1-100，我想要10个随机数字，那么第一个数字将始终为1，然后在随机数字中随机select。作为一个额外的挑战，是否有可能使相同的数字将不被select，直到列表已经循环？这是我正在使用的代码。 Sub Macro1() ' ' ' ' Dim CountCells Dim RandCount Dim LastRow Dim Counter1 Dim Counter2 Worksheets.Add().Name = "Sheet1" Worksheets("Employee ID#").Select Range("a2:A431").Select Selection.Copy Worksheets("Sheet1").Select Selection.PasteSpecial Worksheets("Sheet1").Select Range("A1").Select CountCells = WorksheetFunction.Count(Range("A:A")) 'quantity of random numbers to pick from If CountCells = 0 Then Exit Sub On Error Resume Next Application.DisplayAlerts = […]