Draw PPI network in R