## Not run:
# B <- read.table("../data/bwght.tab",header=TRUE)
# C <- read.table("../data/lala.tab",header=TRUE)
# attach(B)
#
# descsto(B)
# descsto(cigs,name="cigarettes")
# descsto(faminc,name="faminc",row=2)
# descsto(store="tabC")
# ## End(Not run)
Run the code above in your browser using DataLab