update r script for issta paper