Create RankProduct.R