Restricted Var model in RStudio - How to choose which lags to take into the model?

Question

I have to estimate a Var model and AIC and SC suggest 10 Lags. The problem is that I dont have enough observations to include all 10 Lags.

So my question: How can I c