urTable and new function

[fcbarbi]

1.urTable should print the df before the legend
2.basic statistics could be generated to a data.frame with flexible columns as in
statTable( data = df, stats = c("Mean","1Q","Median","3Q,","Max","Min","SD","Skew","Kurt","Obs","JB") )