How to compute the variance for each column?

[Tung]

allsample <- combn(c(8,3,1,11,4,7), 3)

How to compute the variance for each column of the data set above?

[technocrat]

allsample <- combn(c(8,3,1,11,4,7), 3)
apply(allsample,2,var)
#>  [1] 13.000000 16.333333  7.000000  7.000000 26.333333 12.333333 14.333333
#>  [8] 12.333333  4.333333  4.333333 28.000000  2.333333  9.333333 19.000000
#> [15] 16.000000  4.333333 26.333333 25.333333  9.000000 12.333333

^{Created on 2021-09-14 by the reprex package (v2.0.1)}