Added r script for the GW slave list