r - dbplyr によるシードの設定

Question

データベーステーブルからサンプリングするには、パターンを頻繁に使用します

library(dplyr)

tbl(con, 'tableName') %>%
  mutate(z = random()) %>%
  compute() %>%
  arrange(z) %>%
  filter(row_number() < numSamples) %>%
  collect()

サンプルを複製できるようにシードを設定する方法はありますか?