Update constructors.R

Fixed colnames.