Added comments to the code in netSI.R file