describe.numeric(x,num.desc=c("mean","median","var","sd","valid.n"),
varname="",vname.space=10,fname.space=10)describe.numeric displays the name of the vector and the results of the
functions whose names are passed in num.desc.describe, valid.n