R script for Analyzing the Herpes Simplex Virus Protein interaction Network