Developing pedotransfer functions to estimate the S-index for indicating soil quality