Fixes issue#48 added check for possible use of poly()

[Taxecron]

simplified extraction of vars and model. Now stops if poly(x,1) is used, although this is linear, but this should be negligible.