## Not run:
#
# DB <- makeDB('/media/disk-1/TUNG_2010', "2010",
# kind=2,Iendian=1, BIGLONG=FALSE )
#
# sw <- which(DB$yr>2011)
#
# ########## remove the bad lines from the DB
# DDB <- editDB(DB, -sw)
# infoDB(DB)
#
# ############# to change the path names if the data
# ## moves to a different server:
#
# ###for example:
# ###
#
# path1<-"/data/wadati/soju"
# path2<-"/mnt"
#
# newDB <- pathDB(DB, path1, path2 )
#
# ## End(Not run)
Run the code above in your browser using DataLab