R-scripts for implementing tensor decomposition methods - Jing,Han (2018)