added R tune script.