That is weird; from what I understand (not an R expert), set.seed takes an integer, so I assume that number gets truncated / approximated to an integer. That means that all nearby seeds give the same result: for instance changing 7998976 to 7998977 or 7998975 makes no difference, up to the next multiple of 5271. This makes the result look a lot less random. Was Anne cheating?
From the documentation at https://stat.ethz.ch/R-manual/R-devel/library/base/html/Rand..., seed is "a single value, interpreted as an integer, or NULL (see ‘Details’)." From some quick testing it appears that "interpreted" means "truncated".