Elixir - Agent 中的随机数

Question

我正在尝试实现一个像骰子一样的代理：

defmodule Dice do
  @on_load :seed_generator

  def start_link(opts \\ []) do
    Agent.start_link(fn -> [] end, name: __MODULE__)
  end

  def roll(n, val) do
    Agent.cast(__MODULE__, fn(_) ->
      Stream.repeatedly(fn -> :random.uniform(val) end)
      |> Enum.take(n)
    end)
  end

  def seed_generator do
    :random.seed(:erlang.now)
    :ok
  end
end

但是，每次我重新启动 iex 时，生成的数字都是一样的。 我究竟做错了什么 ？种子是否因为 :random.uniform 调用在代理内部而不起作用？或者与Stream 相关的东西。

Answer 1

seed_generator 函数在与您的Agent 将使用的进程不同的进程中调用。实际上，在加载此代码时甚至不存在该过程。启动 Agent 时尝试为生成器播种：

defmodule Dice do
  def start_link(opts \\ []) do
    Agent.start_link(fn -> :random.seed(:erlang.now) end, name: __MODULE__)
  end

  def roll(n, val) do
    Agent.get(__MODULE__, fn(_) ->
      Stream.repeatedly(fn -> :random.uniform(val) end)
      |> Enum.take(n)
    end)
  end
end