How to compute the most correlated variable between multiple variables(except itself)? And how to simply the codes by using loops or map functions?

Question

Let\'s say I have a data frame like this: data frame

For each variable, how do I compute its most positively correlated variable(except itself) and how do I simplify my c