R Function for Computing Sum of Neighboring Cells in Matrix

Using "for", "if", and "else if" Functions to Create a New Variable in R: A Better Alternative Using max.col()