Update 1. data.table.intro.r