Returns the number of model's coefficients. This is the sum of demand, supply, price equation, and the variance-covariance matrix coefficients.

## Usage

```
ncoef(object)
# S4 method for market_model
ncoef(object)
# S4 method for market_fit
ncoef(object)
```

## Examples

```
# \donttest{
model <- new(
"diseq_basic", # model type
subject = ID, time = TREND, quantity = HS, price = RM,
demand = RM + TREND + W + CSHS + L1RM + L2RM + MONTH,
supply = RM + TREND + W + L1RM + MA6DSF + MA3DHF + MONTH,
fair_houses()
)
# get the number of model coefficients
ncoef(model)
#> [1] 39
# }
```