R

rand <- function(seed = as.double(Sys.time()), upper = 99999, rng_one = T) {
  force(seed)
  function() {
    rand_num <- (1664525 * seed + 1013904223) %% upper
    seed <<- seed + 1
    if (rng_one) return(rand_num/upper)
    else return(rand_num)
  }
}

rand2019 <- rand(seed = 2019)
rand2019()

#> [1] 0.2394424

rand2019()

#> [1] 0.8848588

Python

import time
def rand(seed=time.time(), upper=99999, rng_one=True):
    def randgen():
        nonlocal seed
        rand_num = (1664525 * seed + 1013904223) % upper
        seed += 1
        if rng_one: return(rand_num/upper)
        else: return(rand_num)
    return(randgen)

rand2019 = rand(seed=2019)
print(rand2019())

#> 0.23944239442394424

print(rand2019())

#> 0.8848588485884858

See Klein (2019) for more about global, local, and nolocal variables.