# Example 1: Create from an existing demogdata object
demography_obj <- demography::demogdata(
data = matrix(runif(10*5), nrow = 10),
pop = matrix(runif(10*5, 1000, 2000), nrow = 10),
ages = 50:59,
years = 2000:2004,
type = "mortality",
name = "male",
label = "France"
)
nn_data <- NNMoMoData(demography_obj)
head(nn_data)
if (FALSE) {
# Example 2: Automatic download from HMD if no arguments are provided
# (will prompt for email and password, requires HMD access)
nn_data_auto <- NNMoMoData()
head(nn_data_auto)
}
Run the code above in your browser using DataLab