ChatGPT解决这个技术问题 Extra ChatGPT

O(1)中的唯一(非重复)随机数?

我想生成 0 到 1000 之间的唯一随机数,这些随机数永远不会重复(即 6 不会出现两次),但这不会诉诸于对先前值进行 O(N) 搜索之类的方法。这可能吗?

这与stackoverflow.com/questions/158716/…不是同一个问题吗
是否介于 0 和 1000 之间?
如果您在恒定时间内禁止任何事情(例如时间或记忆中的 O(n)),那么下面的许多答案都是错误的,包括已接受的答案。
你会如何洗牌?
警告! 下面给出的许多答案都不会产生真正随机的序列,比 O(n) 慢或有其他缺陷! codinghorror.com/blog/archives/001015.html 是您在使用其中任何一个或尝试自己编写之前必须阅读的内容!

G
Green goblin

使用值 0-1000 初始化一个包含 1001 个整数的数组,并将变量 max 设置为数组的当前最大索引(从 1000 开始)。选择一个介于 0 和 max 之间的随机数 r,将位置 r 处的数字与位置 max 处的数字交换,然后返回当前位置 max 处的数字。将 max 减 1 并继续。当 max 为 0 时,将 max 设置回数组的大小 - 1 并重新开始,无需重新初始化数组。

更新:虽然我在回答问题时自己想出了这种方法,但经过一些研究后,我意识到这是 Fisher-Yates 的修改版本,称为 Durstenfeld-Fisher-Yates 或 Knuth-Fisher -耶茨。由于描述可能有点难以理解,我在下面提供了一个示例(使用 11 个元素而不是 1001 个):

数组从初始化为 array[n] = n 的 11 个元素开始,最大值从 10 开始:

+--+--+--+--+--+--+--+--+--+--+--+
| 0| 1| 2| 3| 4| 5| 6| 7| 8| 9|10|
+--+--+--+--+--+--+--+--+--+--+--+
                                ^
                               max    

每次迭代时,在 0 和 max 之间选择一个随机数 r,array[r] 和 array[max] 交换,返回新的 array[max],max 递减:

max = 10, r = 3
           +--------------------+
           v                    v
+--+--+--+--+--+--+--+--+--+--+--+
| 0| 1| 2|10| 4| 5| 6| 7| 8| 9| 3|
+--+--+--+--+--+--+--+--+--+--+--+

max = 9, r = 7
                       +-----+
                       v     v
+--+--+--+--+--+--+--+--+--+--+--+
| 0| 1| 2|10| 4| 5| 6| 9| 8| 7: 3|
+--+--+--+--+--+--+--+--+--+--+--+

max = 8, r = 1
     +--------------------+
     v                    v
+--+--+--+--+--+--+--+--+--+--+--+
| 0| 8| 2|10| 4| 5| 6| 9| 1: 7| 3|
+--+--+--+--+--+--+--+--+--+--+--+

max = 7, r = 5
                 +-----+
                 v     v
+--+--+--+--+--+--+--+--+--+--+--+
| 0| 8| 2|10| 4| 9| 6| 5: 1| 7| 3|
+--+--+--+--+--+--+--+--+--+--+--+

...

11次迭代后,数组中的所有数字都被选中,max == 0,数组元素被打乱:

+--+--+--+--+--+--+--+--+--+--+--+
| 4|10| 8| 6| 2| 0| 9| 5| 1| 7| 3|
+--+--+--+--+--+--+--+--+--+--+--+

此时,可以将 max 重置为 10,并且可以继续该过程。


杰夫关于洗牌的帖子表明这不会返回好的随机数.. codinghorror.com/blog/archives/001015.html
@Peter Rounce:我不这么认为;在我看来,这就像在 Jeff 的帖子中引用的 Fisher Yates 算法(作为好人)。
@robert:我只是想指出它不会像问题的名称那样产生“O(1) 中的唯一随机数”。
@mikera:同意,尽管从技术上讲,如果您使用固定大小的整数,则可以在 O(1) 中生成整个列表(具有较大的常数,即 2^32)。此外,出于实际目的,“随机”的定义很重要——如果你真的想使用系统的熵池,限制是随机位的计算而不是计算本身,在这种情况下 n log n 是相关的再次。但是在您将使用(相当于)/dev/urandom 而不是/dev/random 的可能情况下,您将回到“实际上”O(n)。
我有点困惑,您必须执行 N 次迭代(在本例中为 11 次)才能获得所需的结果,这是否意味着它是 O(n)?因为您需要进行 N 次迭代才能从相同的初始状态获得 N! 个组合,否则您的输出将只是 N 个状态之一。
C
Chris Jester-Young

你可以这样做:

创建一个列表,0..1000。随机播放列表。 (请参阅 Fisher-Yates shuffle 以获得这样做的好方法。)从 shuffled 列表中按顺序返回数字。

所以这不需要每次都搜索旧值,但它仍然需要 O(N) 进行初始洗牌。但正如 Nils 在评论中指出的那样,这是摊销 O(1)。


@Just Some Guy N = 1000,所以你说它是 O(N/N),即 O(1)
如果每次插入到shuffled数组中都是一次操作,那么插入1个值后,可以得到1个随机值。 2 代表 2 个值,以此类推,n 代表 n 个值。生成列表需要 n 次操作,所以整个算法是 O(n)。如果您需要 1,000,000 个随机值,则需要 1,000,000 次操作
这样想,如果它是恒定的时间,那么 10 个随机数所花费的时间与 100 亿个随机数所花费的时间相同。但是由于改组采用 O(n),我们知道这不是真的。
这实际上需要分摊时间 O(log n),因为您需要生成 n lg n 个随机位。
而现在,我有充分的理由去做这件事! meta.stackoverflow.com/q/252503/13
p
plinth

使用 Maximal Linear Feedback Shift Register

它可以用几行 C 语言来实现,并且在运行时只做几个测试/分支、一点加法和位移。这不是随机的,但它欺骗了大多数人。


“这不是随机的,但它愚弄了大多数人”。这适用于所有伪随机数生成器以及该问题的所有可行答案。但大多数人不会考虑。所以省略这个注释可能会导致更多的赞成票......
@bobobobo:O(1) 内存就是原因。
Nit:这是 O(log N) 内存。
使用这种方法,你如何生成数字,比如说 0 到 800000 之间?有些人可能会使用周期为 1048575 (2^20 - 1) 的 LFSR,如果数字超出范围,则获取下一个,但这不会有效。
作为 LFSR,这不会产生均匀分布的序列:将生成的整个序列由第一个元素定义。
C
Craig McQueen

您可以使用 Format-Preserving Encryption 来加密计数器。您的计数器只是从 0 向上,加密使用您选择的密钥将其转换为您想要的任何基数和宽度的看似随机的值。例如,对于这个问题中的示例:基数 10,宽度 3。

块密码通常具有固定的块大小,例如 64 或 128 位。但是 Format-Preserving Encryption 允许您采用像 AES 这样的标准密码,并使用您想要的任何基数和宽度的更小宽度的密码,并使用一种在密码学上仍然健壮的算法。

保证永远不会发生冲突(因为密码算法创建 1:1 映射)。它也是可逆的(2 路映射),因此您可以获取结果数字并返回您开始使用的计数器值。

这种技术不需要内存来存储洗牌数组等,这在内存有限的系统上可能是一个优势。

AES-FFX 是实现此目的的一种建议标准方法。我已经尝试了一些基于 AES-FFX 思想的基本 Python 代码,虽然不完全符合 - see Python code here。例如,它可以将计数器加密为看似随机的 7 位十进制数或 16 位数字。如问题所述,这是基数 10、宽度 3 的示例(给出 0 到 999 之间的数字):

000   733
001   374
002   882
003   684
004   593
005   578
006   233
007   811
008   072
009   337
010   119
011   103
012   797
013   257
014   932
015   433
...   ...

要获得不同的非重复伪随机序列,请更改加密密钥。每个加密密钥产生一个不同的非重复伪随机序列。


这本质上是一个简单的映射,因此与 LCG 和 LFSR 没有任何不同,具有所有相关的扭结(例如,序列中间隔大于 k 的值永远不会同时出现)。
@ivan_pozdeev:我很难理解你评论的意思。你能解释一下这个映射有什么问题吗,什么是“所有相关的问题”,什么是 k
所有有效的“加密”在这里都是用一个相同数字的序列替换序列 1,2,...,N,但仍然是不变的。然后从这个序列中一个一个地提取数字。 k 是选择的值的数量(OP 没有为它指定一个字母,所以我不得不介绍一个)。
@ivan_pozdeev FPE 不是必须实现特定的静态映射,或者“返回的组合完全由第一个数字定义”。由于配置参数比第一个数字的大小(只有一千个状态)大得多,因此应该有多个序列以相同的初始值开始,然后继续到不同的后续值。任何现实的生成器都将无法覆盖整个可能的排列空间;当 OP 没有要求时,不值得提高这种故障模式。
+1。如果正确实施,使用安全分组密码和随机统一选择的密钥,使用此方法生成的序列在计算上与真正的随机 shuffle 无法区分。也就是说,没有办法比通过测试所有可能的分组密码密钥并查看它们中的任何一个是否生成相同的输出更快地将这种方法的输出与真正的随机洗牌区分开来。对于 128 位密钥空间的密码,这可能超出了人类目前可用的计算能力;使用 256 位密钥,它可能会永远如此。
P
Paul de Vrieze

您可以使用 A Linear Congruential Generator。其中 m(模数)将是大于 1000 的最接近的素数。当您得到一个超出范围的数字时,只需获取下一个。该序列只会在所有元素都发生后重复,您不必使用表格。但是请注意此生成器的缺点(包括缺乏随机性)。


1009 是 1000 之后的第一个素数。
LCG 在连续数字之间具有高度相关性,因此 组合 不会完全随机(例如,序列中相距远大于 k 的数字永远不会一起出现)。
m 应该是元素 1001 的数量(1000 + 1 表示零),您可以使用 Next = (1002 * Current + 757) mod 1001;
s
sellibitze

对于像 0...1000 这样的小数字,创建一个包含所有数字的列表并对其进行改组非常简单。但是,如果要从中提取的数字集非常大,还有另一种优雅的方法:您可以使用密钥和加密哈希函数构建伪随机排列。请参阅以下 C++-ish 示例伪代码:

unsigned randperm(string key, unsigned bits, unsigned index) {
  unsigned half1 =  bits    / 2;
  unsigned half2 = (bits+1) / 2;
  unsigned mask1 = (1 << half1) - 1;
  unsigned mask2 = (1 << half2) - 1;
  for (int round=0; round<5; ++round) {
    unsigned temp = (index >> half1);
    temp = (temp << 4) + round;
    index ^= hash( key + "/" + int2str(temp) ) & mask1;
    index = ((index & mask2) << half1) | ((index >> half2) & mask1);
  }
  return index;
}

这里,hash 只是一些任意的伪随机函数,它将字符串映射到一个可能很大的无符号整数。函数 randperm 是 0...pow(2,bits)-1 内所有数字的排列,假设一个固定键。这是从构造中得出的,因为改变变量 index 的每一步都是可逆的。这是受 Feistel cipher 启发的。


stackoverflow.com/a/16097246/648265 相同,序列的随机性同样失败。
@ivan_pozdeev:理论上,假设计算能力无限,是的。然而,假设上面代码中使用的 hash() 是一个安全的伪随机函数,这个构造将可证明(Luby & Rackoff,1988)产生一个 pseudorandom permutation,它不能与真正的随机洗牌区分开来比对整个密钥空间的详尽搜索更少的努力,整个密钥空间是密钥长度的指数。即使对于大小合理的密钥(例如 128 位),这也超出了地球上可用的总计算能力。
(顺便说一句,为了让这个论点更严格一点,我更愿意用 HMAC 替换上面的临时 hash( key + "/" + int2str(temp) ) 构造,其安全性反过来可以证明可以降低到底层哈希压缩函数的安全性。另外, 使用 HMAC 可能会降低某人错误地尝试将此构造与不安全的非加密哈希函数一起使用的可能性。)
T
Tod Samay

您可以使用此处描述的我的 Xincrol 算法:

http://openpatent.blogspot.co.il/2013/04/xincrol-unique-and-random-number.html

这是一种生成随机但唯一数字的纯算法方法,无需数组、列表、排列或繁重的 CPU 负载。

最新版本还允许设置数字范围,例如,如果我想要 0-1073741821 范围内的唯一随机数。

我实际上已经将它用于

MP3 播放器随机播放每首歌曲,但每个专辑/目录仅播放一次

逐像素视频帧溶解效果(快速流畅)

为签名和标记(隐写术)在图像上创建秘密“噪声”雾

用于通过数据库序列化大量 Java 对象的数据对象 ID

三重多数内存位保护

地址+值加密(每个字节不仅被加密,而且被移动到缓冲区中一个新的加密位置)。这真的让密码分析人员对我很生气:-)

纯文本到纯文本加密,用于 SMS、电子邮件等。

我的德州扑克计算器 (THC)

我的几款游戏用于模拟,“洗牌”,排名

更多的

它是开放的,免费的。试试看...


该方法是否适用于十进制值,例如将 3 位十进制计数器加扰以始终具有 3 位十进制结果?
作为 Xorshift 算法的一个示例,它是一个 LFSR,具有所有相关的扭结(例如,序列中间隔超过 k 的值永远不会同时出现)。
a
approxiblue

我认为 Linear congruential generator 将是最简单的解决方案。

https://i.stack.imgur.com/rFB37.png

并且对 a、c 和 m 值只有 3 个限制

和 c 互质,a-1 能被 m 的所有质因数整除 如果 m 能被 4 整除,a-1 能被 4 整除

PS该方法已经提到过,但是帖子对常数值有错误的假设。下面的常量应该适用于您的情况

在您的情况下,您可以使用 a = 1002c = 757m = 1001

X = (1002 * X + 757) mod 1001

M
Max

你甚至不需要一个数组来解决这个问题。

你需要一个位掩码和一个计数器。

将计数器初始化为零并在连续调用时将其递增。将计数器与位掩码(在启动时随机选择或固定)进行异或运算以生成伪随机数。如果不能有超过 1000 的数字,请不要使用超过 9 位的位掩码。 (换句话说,位掩码是不大于 511 的整数。)

确保当计数器超过 1000 时,将其重置为零。此时,您可以选择另一个随机位掩码(如果您愿意)以不同的顺序生成相同的数字集。


这将比 LFSR 愚弄更少的人。
512...1023 内的“位掩码”也可以。如需更多虚假随机性,请参阅我的答案。 :-)
本质上等同于 stackoverflow.com/a/16097246/648265,序列的随机性也失败了。
j
jordanhill123

这是我使用第一个解决方案的逻辑键入的一些代码。我知道这是“语言不可知论”,但只是想在 C# 中将其作为示例呈现,以防有人正在寻找快速实用的解决方案。

// Initialize variables
Random RandomClass = new Random();
int RandArrayNum;
int MaxNumber = 10;
int LastNumInArray;
int PickedNumInArray;
int[] OrderedArray = new int[MaxNumber];      // Ordered Array - set
int[] ShuffledArray = new int[MaxNumber];     // Shuffled Array - not set

// Populate the Ordered Array
for (int i = 0; i < MaxNumber; i++)                  
{
    OrderedArray[i] = i;
    listBox1.Items.Add(OrderedArray[i]);
}

// Execute the Shuffle                
for (int i = MaxNumber - 1; i > 0; i--)
{
    RandArrayNum = RandomClass.Next(i + 1);         // Save random #
    ShuffledArray[i] = OrderedArray[RandArrayNum];  // Populting the array in reverse
    LastNumInArray = OrderedArray[i];               // Save Last Number in Test array
    PickedNumInArray = OrderedArray[RandArrayNum];  // Save Picked Random #
    OrderedArray[i] = PickedNumInArray;             // The number is now moved to the back end
    OrderedArray[RandArrayNum] = LastNumInArray;    // The picked number is moved into position
}

for (int i = 0; i < MaxNumber; i++)                  
{
    listBox2.Items.Add(ShuffledArray[i]);
}

s
salva

当限制很高并且您只想生成几个随机数时,此方法的结果是合适的。

#!/usr/bin/perl

($top, $n) = @ARGV; # generate $n integer numbers in [0, $top)

$last = -1;
for $i (0 .. $n-1) {
    $range = $top - $n + $i - $last;
    $r = 1 - rand(1.0)**(1 / ($n - $i));
    $last += int($r * $range + 1);
    print "$last ($r)\n";
}

请注意,数字是按升序生成的,但之后您可以随机播放。


由于这会生成组合而不是排列,因此更适合 stackoverflow.com/questions/2394246/…
测试表明这对较小的数字有偏差:2M 样本的测量概率为 (top,n)=(100,10)(0.01047705, 0.01044825, 0.01041225, ..., 0.0088324, 0.008723, 0.00863635)。我在 Python 中进行了测试,因此数学上的细微差别可能会在这里起作用(我确实确保用于计算 r 的所有操作都是浮点数)。
是的,为了使此方法正常工作,上限必须远大于要提取的值的数量。
即使“上限 [is] 远大于值的数量”,它也不会“正确”工作。概率仍然是不均匀的,只是幅度较小。
H
Hans Olsson

问题 How do you efficiently generate a list of K non-repeating integers between 0 and an upper bound N 被链接为重复项 - 如果您想要每个生成的随机数 O(1) 的东西(没有 O(n) 启动成本),则可以对已接受的答案进行简单调整。

从整数到整数创建一个空的无序映射(一个空的有序映射每个元素需要 O(log k)) - 而不是使用初始化数组。如果这是最大值,请将最大值设置为 1000,

选择一个介于 0 和最大值之间的随机数 r。确保地图元素 r 和 max 都存在于无序地图中。如果它们不存在,则使用等于它们的索引的值创建它们。交换元素 r 和 max 返回元素 max 并将 max 减 1(如果 max 变为负数,则完成)。返回步骤 1。

与使用初始化数组相比的唯一区别是元素的初始化被推迟/跳过 - 但它将从相同的 PRNG 生成完全相同的数字。


p
pro

您可以使用具有 10 位的良好 pseudo-random number generator 并丢弃 1001 到 1023 留下 0 到 1000。

here 我们得到 10 位 PRNG 的设计..

10 位,反馈多项式 x^10 + x^7 + 1(周期 1023)

使用 Galois LFSR 获取快速代码


@Phob 不,这不会发生,因为基于线性反馈移位寄存器的 10 位 PRNG 通常是由在返回第一个值之前假设所有值(一个除外)的构造制成的。换句话说,它只会在一个周期中准确地选择 1001 一次。
@Phob 这个问题的重点是每个数字只选择一次。然后你抱怨 1001 不会连续出现两次?具有最佳传播的 LFSR 将以伪随机方式遍历其空间中的所有数字,然后重新开始循环。换句话说,它不用作通常的随机函数。当用作随机数时,我们通常只使用比特的一个子集。阅读一下它,它很快就会变得有意义。
唯一的问题是给定的 LFSR 只有一个序列,因此在选择的数字之间具有很强的相关性 - 特别是,不会生成所有可能的组合。
j
jordanhill123
public static int[] randN(int n, int min, int max)
{
    if (max <= min)
        throw new ArgumentException("Max need to be greater than Min");
    if (max - min < n)
        throw new ArgumentException("Range needs to be longer than N");

    var r = new Random();

    HashSet<int> set = new HashSet<int>();

    while (set.Count < n)
    {
        var i = r.Next(max - min) + min;
        if (!set.Contains(i))
            set.Add(i);
    }

    return set.ToArray();
}

根据需要,N 个非重复随机数将具有 O(n) 复杂度。注意:随机应该是静态的,并且应用了线程安全。


O(n^2),因为重试次数平均与迄今为止选择的元素数量成正比。
想想看,如果你选择 min=0 max=10000000 和 N=5,无论选择多少都重试 ~=0。但是,是的,您有一点,如果 max-min 很小,则 o(N) 会分解。
如果 N<<(max-min) 那么它仍然是成比例的,只是系数很小。并且系数对于渐近估计无关紧要。
这不是 O(n)。每次集合包含值 this is 和额外循环。
M
Myron Denson

这是一些您可以使用的示例 COBOL 代码。我可以给你发送 RANDGEN.exe 文件,这样你就可以用它来看看它是否需要你想要的。

   IDENTIFICATION DIVISION.
   PROGRAM-ID.  RANDGEN as "ConsoleApplication2.RANDGEN".
   AUTHOR.  Myron D Denson.
   DATE-COMPILED.
  * ************************************************************** 
  *  SUBROUTINE TO GENERATE RANDOM NUMBERS THAT ARE GREATER THAN
  *    ZERO AND LESS OR EQUAL TO THE RANDOM NUMBERS NEEDED WITH NO
  *    DUPLICATIONS.  (CALL "RANDGEN" USING RANDGEN-AREA.)
  *     
  *  CALLING PROGRAM MUST HAVE A COMPARABLE LINKAGE SECTION
  *    AND SET 3 VARIABLES PRIOR TO THE FIRST CALL IN RANDGEN-AREA     
  *
  *    FORMULA CYCLES THROUGH EVERY NUMBER OF 2X2 ONLY ONCE. 
  *    RANDOM-NUMBERS FROM 1 TO RANDOM-NUMBERS-NEEDED ARE CREATED 
  *    AND PASSED BACK TO YOU.
  *
  *  RULES TO USE RANDGEN:
  *
  *    RANDOM-NUMBERS-NEEDED > ZERO 
  *     
  *    COUNT-OF-ACCESSES MUST = ZERO FIRST TIME CALLED.
  *         
  *    RANDOM-NUMBER = ZERO, WILL BUILD A SEED FOR YOU
  *    WHEN COUNT-OF-ACCESSES IS ALSO = 0 
  *     
  *    RANDOM-NUMBER NOT = ZERO, WILL BE NEXT SEED FOR RANDGEN
  *    (RANDOM-NUMBER MUST BE <= RANDOM-NUMBERS-NEEDED)       
  *     
  *    YOU CAN PASS RANDGEN YOUR OWN RANDOM-NUMBER SEED
  *     THE FIRST TIME YOU USE RANDGEN.
  *     
  *    BY PLACING A NUMBER IN RANDOM-NUMBER FIELD
  *      THAT FOLLOWES THESE SIMPLE RULES:
  *        IF COUNT-OF-ACCESSES = ZERO AND 
  *        RANDOM-NUMBER > ZERO AND 
  *        RANDOM-NUMBER <= RANDOM-NUMBERS-NEEDED
  *       
  *    YOU CAN LET RANDGEN BUILD A SEED FOR YOU
  *     
  *      THAT FOLLOWES THESE SIMPLE RULES:
  *        IF COUNT-OF-ACCESSES = ZERO AND 
  *        RANDOM-NUMBER = ZERO AND 
  *        RANDOM-NUMBER-NEEDED > ZERO  
  *         
  *     TO INSURING A DIFFERENT PATTERN OF RANDOM NUMBERS
  *        A LOW-RANGE AND HIGH-RANGE IS USED TO BUILD
  *        RANDOM NUMBERS.
  *        COMPUTE LOW-RANGE =
  *             ((SECONDS * HOURS * MINUTES * MS) / 3).         
  *        A HIGH-RANGE = RANDOM-NUMBERS-NEEDED + LOW-RANGE
  *        AFTER RANDOM-NUMBER-BUILT IS CREATED 
  *        AND IS BETWEEN LOW AND HIGH RANGE
  *        RANDUM-NUMBER = RANDOM-NUMBER-BUILT - LOW-RANGE
  *               
  * **************************************************************         
   ENVIRONMENT DIVISION.
   INPUT-OUTPUT SECTION.
   FILE-CONTROL.
   DATA DIVISION.
   FILE SECTION.
   WORKING-STORAGE SECTION.
   01  WORK-AREA.
       05  X2-POWER                     PIC 9      VALUE 2. 
       05  2X2                          PIC 9(12)  VALUE 2 COMP-3.
       05  RANDOM-NUMBER-BUILT          PIC 9(12)  COMP.
       05  FIRST-PART                   PIC 9(12)  COMP.
       05  WORKING-NUMBER               PIC 9(12)  COMP.
       05  LOW-RANGE                    PIC 9(12)  VALUE ZERO.
       05  HIGH-RANGE                   PIC 9(12)  VALUE ZERO.
       05  YOU-PROVIDE-SEED             PIC X      VALUE SPACE.
       05  RUN-AGAIN                    PIC X      VALUE SPACE.
       05  PAUSE-FOR-A-SECOND           PIC X      VALUE SPACE.   
   01  SEED-TIME.
       05  HOURS                        PIC 99.
       05  MINUTES                      PIC 99.
       05  SECONDS                      PIC 99.
       05  MS                           PIC 99. 
  *
  * LINKAGE SECTION.
  *  Not used during testing  
   01  RANDGEN-AREA.
       05  COUNT-OF-ACCESSES            PIC 9(12) VALUE ZERO.
       05  RANDOM-NUMBERS-NEEDED        PIC 9(12) VALUE ZERO.
       05  RANDOM-NUMBER                PIC 9(12) VALUE ZERO.
       05  RANDOM-MSG                   PIC X(60) VALUE SPACE.
  *    
  * PROCEDURE DIVISION USING RANDGEN-AREA.
  * Not used during testing 
  *  
   PROCEDURE DIVISION.
   100-RANDGEN-EDIT-HOUSEKEEPING.
       MOVE SPACE TO RANDOM-MSG. 
       IF RANDOM-NUMBERS-NEEDED = ZERO
         DISPLAY 'RANDOM-NUMBERS-NEEDED ' NO ADVANCING
         ACCEPT RANDOM-NUMBERS-NEEDED.
       IF RANDOM-NUMBERS-NEEDED NOT NUMERIC 
         MOVE 'RANDOM-NUMBERS-NEEDED NOT NUMERIC' TO RANDOM-MSG
           GO TO 900-EXIT-RANDGEN.
       IF RANDOM-NUMBERS-NEEDED = ZERO
         MOVE 'RANDOM-NUMBERS-NEEDED = ZERO' TO RANDOM-MSG
           GO TO 900-EXIT-RANDGEN.
       IF COUNT-OF-ACCESSES NOT NUMERIC
         MOVE 'COUNT-OF-ACCESSES NOT NUMERIC' TO RANDOM-MSG
           GO TO 900-EXIT-RANDGEN.
       IF COUNT-OF-ACCESSES GREATER THAN RANDOM-NUMBERS-NEEDED
         MOVE 'COUNT-OF-ACCESSES > THAT RANDOM-NUMBERS-NEEDED'
           TO RANDOM-MSG
           GO TO 900-EXIT-RANDGEN.
       IF YOU-PROVIDE-SEED = SPACE AND RANDOM-NUMBER = ZERO
         DISPLAY 'DO YOU WANT TO PROVIDE SEED  Y OR N: '
           NO ADVANCING
           ACCEPT YOU-PROVIDE-SEED.  
       IF RANDOM-NUMBER = ZERO AND
          (YOU-PROVIDE-SEED = 'Y' OR 'y')
         DISPLAY 'ENTER SEED ' NO ADVANCING
         ACCEPT RANDOM-NUMBER. 
       IF RANDOM-NUMBER NOT NUMERIC
         MOVE 'RANDOM-NUMBER NOT NUMERIC' TO RANDOM-MSG
         GO TO 900-EXIT-RANDGEN.
   200-RANDGEN-DATA-HOUSEKEEPING.      
       MOVE FUNCTION CURRENT-DATE (9:8) TO SEED-TIME.
       IF COUNT-OF-ACCESSES = ZERO
         COMPUTE LOW-RANGE =
                ((SECONDS * HOURS * MINUTES * MS) / 3).
       COMPUTE RANDOM-NUMBER-BUILT = RANDOM-NUMBER + LOW-RANGE.  
       COMPUTE HIGH-RANGE = RANDOM-NUMBERS-NEEDED + LOW-RANGE.
       MOVE X2-POWER TO 2X2.             
   300-SET-2X2-DIVISOR.
       IF 2X2 < (HIGH-RANGE + 1) 
          COMPUTE 2X2 = 2X2 * X2-POWER
           GO TO 300-SET-2X2-DIVISOR.    
  * *********************************************************         
  *  IF FIRST TIME THROUGH AND YOU WANT TO BUILD A SEED.    *
  * ********************************************************* 
       IF COUNT-OF-ACCESSES = ZERO AND RANDOM-NUMBER = ZERO
          COMPUTE RANDOM-NUMBER-BUILT =
                ((SECONDS * HOURS * MINUTES * MS) + HIGH-RANGE).
       IF COUNT-OF-ACCESSES = ZERO        
         DISPLAY 'SEED TIME ' SEED-TIME 
               ' RANDOM-NUMBER-BUILT ' RANDOM-NUMBER-BUILT 
               ' LOW-RANGE  ' LOW-RANGE.          
  * *********************************************     
  *    END OF BUILDING A SEED IF YOU WANTED TO  * 
  * *********************************************               
  * ***************************************************
  * THIS PROCESS IS WHERE THE RANDOM-NUMBER IS BUILT  *  
  * ***************************************************   
   400-RANDGEN-FORMULA.
       COMPUTE FIRST-PART = (5 * RANDOM-NUMBER-BUILT) + 7.
       DIVIDE FIRST-PART BY 2X2 GIVING WORKING-NUMBER 
         REMAINDER RANDOM-NUMBER-BUILT. 
       IF RANDOM-NUMBER-BUILT > LOW-RANGE AND
          RANDOM-NUMBER-BUILT < (HIGH-RANGE + 1)
         GO TO 600-RANDGEN-CLEANUP.
       GO TO 400-RANDGEN-FORMULA.
  * *********************************************     
  *    GOOD RANDOM NUMBER HAS BEEN BUILT        *               
  * *********************************************
   600-RANDGEN-CLEANUP.
       ADD 1 TO COUNT-OF-ACCESSES.
       COMPUTE RANDOM-NUMBER = 
            RANDOM-NUMBER-BUILT - LOW-RANGE. 
  * *******************************************************
  * THE NEXT 3 LINE OF CODE ARE FOR TESTING  ON CONSOLE   *  
  * *******************************************************
       DISPLAY RANDOM-NUMBER.
       IF COUNT-OF-ACCESSES < RANDOM-NUMBERS-NEEDED
        GO TO 100-RANDGEN-EDIT-HOUSEKEEPING.     
   900-EXIT-RANDGEN.
       IF RANDOM-MSG NOT = SPACE
        DISPLAY 'RANDOM-MSG: ' RANDOM-MSG.
        MOVE ZERO TO COUNT-OF-ACCESSES RANDOM-NUMBERS-NEEDED RANDOM-NUMBER. 
        MOVE SPACE TO YOU-PROVIDE-SEED RUN-AGAIN.
       DISPLAY 'RUN AGAIN Y OR N '
         NO ADVANCING.
       ACCEPT RUN-AGAIN.
       IF (RUN-AGAIN = 'Y' OR 'y')
         GO TO 100-RANDGEN-EDIT-HOUSEKEEPING.
       ACCEPT PAUSE-FOR-A-SECOND.
       GOBACK.

我不知道这是否真的可以满足 OPs 的需求,但是 COBOL 贡献的道具!
K
Khaled.K

假设您想一遍又一遍地检查已洗牌的列表,而每次重新开始洗牌时都没有 O(n) 延迟,在这种情况下,我们可以这样做:

创建 2 个列表 A 和 B,从 0 到 1000,占用 2n 空间。使用 Fisher-Yates 对列表 A 进行洗牌,需要 n 时间。绘制数字时,在另一个列表上执行 1 步 Fisher-Yates 洗牌。当光标在列表末尾时,切换到另一个列表。

预处理

cursor = 0

selector = A
other    = B

shuffle(A)

temp = selector[cursor]

swap(other[cursor], other[random])

if cursor == N
then swap(selector, other); cursor = 0
else cursor = cursor + 1

return temp

不必保留 2 个列表 - 在查看之前用完一个列表。 Fisher-Yates 给出了任何初始状态的均匀随机结果。有关说明,请参见 stackoverflow.com/a/158742/648265
@ivan_pozdeev 是的,结果相同,但我的想法是通过将随机播放作为绘图动作的一部分来使其摊销 O(1)。
你没明白。在再次随机播放之前,您根本不需要重置列表。改组 [1,3,4,5,2] 将产生与改组 [1,2,3,4,5] 相同的结果。
T
Toon Krijthe

另一种可能性:

您可以使用一组标志。当它已经被选中时,再拿下一个。

但是,请注意,调用 1000 次后,该功能将永远不会结束,因此您必须做好保护措施。


这个是 O(k^2),平均而言,附加步骤的数量与迄今为止选择的值的数量成正比。
s
sh1

这里的大多数答案都不能保证它们不会两次返回相同的数字。这是一个正确的解决方案:

int nrrand(void) {
  static int s = 1;
  static int start = -1;
  do {
    s = (s * 1103515245 + 12345) & 1023;
  } while (s >= 1001);
  if (start < 0) start = s;
  else if (s == start) abort();

  return s;
}

我不确定约束是否明确。假设在 1000 个其他输出之后允许重复一个值,但是天真地允许 0 在 0 之后立即跟随,只要它们都出现在 1000 组的末尾和开头。相反,虽然可以保持距离重复之间有 1000 个其他值,这样做会迫使序列每次都以完全相同的方式重播自身,因为没有其他值超出该限制。

这是一种在重复值之前始终保证至少 500 个其他值的方法:

int nrrand(void) {
  static int h[1001];
  static int n = -1;

  if (n < 0) {
    int s = 1;
    for (int i = 0; i < 1001; i++) {
      do {
        s = (s * 1103515245 + 12345) & 1023;
      } while (s >= 1001);
      /* If we used `i` rather than `s` then our early results would be poorly distributed. */
      h[i] = s;
    }
    n = 0;
  }

  int i = rand(500);
  if (i != 0) {
      i = (n + i) % 1001;
      int t = h[i];
      h[i] = h[n];
      h[n] = t;
  }
  i = h[n];
  n = (n + 1) % 1001;

  return i;
}

这是一个 LCG,就像 stackoverflow.com/a/196164/648265 一样,对于序列以及其他相关的扭结都是非随机的。
@ivan_pozdeev 我的比 LCG 更好,因为它确保它不会在第 1001 次调用时返回重复项。
E
Emanuel Landeholm

当 N 大于 1000 并且您需要抽取 K 个随机样本时,您可以使用包含迄今为止样本的集合。对于每次绘制,您使用 rejection sampling,这将是一个“几乎”O(1) 操作,因此总运行时间接近 O(K),存储空间为 O(N)。

当 K “接近” N 时,该算法会发生冲突。这意味着运行时间将比 O(K) 差很多。一个简单的解决方法是颠倒逻辑,以便在 K > N/2 时,记录所有尚未抽取的样本。每次抽取都会从拒绝集中删除一个样本。

拒绝采样的另一个明显问题是它是 O(N) 存储,如果 N 达到数十亿或更多,这是个坏消息。但是,有一种算法可以解决这个问题。这个算法在它的发明者之后被称为维特算法。该算法描述为here。 Vitter 算法的要点是,在每次抽签后,您使用确保均匀采样的特定分布计算随机跳跃。


伙计们,请! Fisher-Yates 方法被破坏了。您选择第一个概率为 1/N,第二个概率为 1/(N-1) != 1/N。这是一种有偏差的抽样方法!您确实需要 Vittter 算法来解决偏差。
p
paparazzo

Fisher Yates

for i from n−1 downto 1 do
     j ← random integer such that 0 ≤ j ≤ i
     exchange a[j] and a[i]

它实际上是 O(n-1) 因为你只需要一个交换最后两个这是 C#

public static List<int> FisherYates(int n)
{
    List<int> list = new List<int>(Enumerable.Range(0, n));
    Random rand = new Random();
    int swap;
    int temp;
    for (int i = n - 1; i > 0; i--)
    {
        swap = rand.Next(i + 1);  //.net rand is not inclusive
        if(swap != i)  // it can stay in place - if you force a move it is not a uniform shuffle
        {
            temp = list[i];
            list[i] = list[swap];
            list[swap] = temp;
        }
    }
    return list;
}

已经有一个答案,但它相当冗长并且不承认你可以停在 1(不是 0)
P
Pavel Ruzankin

请在 https://stackoverflow.com/a/46807110/8794687 上查看我的回答

它是最简单的算法之一,平均时间复杂度为 O(s log s),s 表示样本大小。还有一些链接到哈希表算法,据称其复杂度为 O(s)。


f
francesco

有人发布“在 excel 中创建随机数”。我正在使用这个理想。创建一个包含 2 个部分的结构,str.index 和 str.ran;对于 10 个随机数,创建一个包含 10 个结构的数组。将 str.index 设置为 0 到 9,并将 str.ran 设置为不同的随机数。

for(i=0;i<10; ++i) {
      arr[i].index = i;
      arr[i].ran   = rand();
}

根据 arr[i].ran 中的值对数组进行排序。 str.index 现在是随机顺序。下面是c代码:

#include <stdio.h>
#include <stdlib.h>

struct RanStr { int index; int ran;};
struct RanStr arr[10];

int sort_function(const void *a, const void *b);

int main(int argc, char *argv[])
{
   int cnt, i;

   //seed(125);

   for(i=0;i<10; ++i)
   {
      arr[i].ran   = rand();
      arr[i].index = i;
      printf("arr[%d] Initial Order=%2d, random=%d\n", i, arr[i].index, arr[i].ran);
   }

   qsort( (void *)arr, 10, sizeof(arr[0]), sort_function);
   printf("\n===================\n");
   for(i=0;i<10; ++i)
   {
      printf("arr[%d] Random  Order=%2d, random=%d\n", i, arr[i].index, arr[i].ran);
   }

   return 0;
}

int sort_function(const void *a, const void *b)
{
   struct RanStr *a1, *b1;

   a1=(struct RanStr *) a;
   b1=(struct RanStr *) b;

   return( a1->ran - b1->ran );
}