Crating data tables from inside the data table function and from vectors