powered by
Given rate function 1 generated data.
data(simulated_data_1)
list of matrix
# NOT RUN { ages <- 35:85 years <- 1988:2007 FT1 <- function(x,y){0.00148*sin(0.5*pi*x*y)+0.00002} simulated_data_1 <- gen_data(ages,years,FT1,M) # }
Run the code above in your browser using DataLab