modified R execution of declare for length 1 vector to match new model active binding to fix test-declare
modified R execution of declare for length 1 vector to match new model active binding to fix test-declare

nimble-dev/nimble,nimble-dev/nimble,nimble-dev/nimble,nimble-dev/nimble,nimble-dev/nimble