Added code

Added data.mining.R and dm.global.R