How can I get each numeric column's mean in one data?

Question

I have data named cluster_1. It has nominal variable from first column to the third.

# select the columns based on the clustering results
cluster_1 <- mat[whi         


        

Answer 1

colMeans() will give you the mean of each column in a data frame or matrix. And rbind() can be used to append the result.

rbind(cluster_1[, -(1:3)], colMeans(cluster_1[, -(1:3)]))

Answer 2

A generalization of what you are doing can be found with the function addmargins. Try, for example:

cluster_1Means <- addmargins(cluster_1[, -(1:3)], margin = 1, FUN = mean)
cluster_1Means