read_csv()使用随机数做什么？

我只是注意到以read_csv()某种方式使用了出乎意料的随机数（至少对我而言）。相应的基本 R 函数read.csv()不会这样做。那么，read_csv()随机数有什么用呢？我查看了文档，但找不到明确的答案。随机数是否与guess_max参数有关？

library(tidyverse)
set.seed(123)
rnorm(1)
# [1] -0.5604756

set.seed(123)
dat <- read.csv("data/titanic.csv")
rnorm(1)
# [1] -0.5604756

set.seed(123)
dat <- read_csv("data/titanic.csv")
rnorm(1)
#[1] 1.239496

编辑：

1. 正如rawr的评论所建议的那样，我尝试指定col_types并且确实有效。但我仍然想知道为什么会发生这种情况。有人有解释吗？

set.seed(123)
dat <- read_csv("data/titanic.csv", col_types = c("dddccdddcdcc"))
rnorm(1)
#[1] -0.5604756

2. 由于很多人询问 R 和readr版本，这里是我的会话信息。

library(tidyverse)
set.seed(123)
rnorm(1)
# [1] -0.5604756

set.seed(123)
dat <- read.csv("data/titanic.csv")
rnorm(1)
# [1] -0.5604756

set.seed(123)
dat <- read_csv("data/titanic.csv")
rnorm(1)
#[1] 1.239496

^{由reprex 包( v2.0.0 )于 2021 年 6 月 10 日创建}