# get a pre-built model and data set for demonstration purpose
a_model <- dmc_dm()
obs_data(a_model) <- dmc_synth_data
# then get the number of observations by accessing the model
nobs(a_model)
# same number of observations as in the original data set
nrow(dmc_synth_data)
Run the code above in your browser using DataLab