From 4adeeda313a61af48cc1cfc573594773bd089b99 Mon Sep 17 00:00:00 2001 From: "N. Brouard" Date: Thu, 20 Jul 2023 08:40:31 +0000 Subject: [PATCH] *** empty log message *** --- src/simulation.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/simulation.R b/src/simulation.R index a383f24..68e6333 100644 --- a/src/simulation.R +++ b/src/simulation.R @@ -91,7 +91,7 @@ popage65110in1998<- runif(samplesize, min=65, max=110) #gender ragender <- rbinom(n=samplesize, size=1, prob=0.56) -r98iwmid <- 1998 + monthinterview/12 +r98iwmid <- 1998 + (monthinterview-1)/12 yrinterview1 <- floor(r98iwmid) #monthinw1 <- floor((monthinterview - floor(monthinterview))*12)+1 monthinw1 <- floor(monthinterview) -- 2.43.0