Create a heatmap with values $($just run the R codes will get it$).$

Calculate the minimum, maximum, medium, standard deviation of ALL the correlations, except those correlations which are equal to $1$ in the diagonal cells in the heatmap. $($Hints: use functions in R instead of finding them in the heatmap visually. Use the summary$($cor$.$mat$)$ will get the min, max and medium, and use function sd$()$ for the standard deviation$).$