Update comm.R

changed "=" in "<-"