R table()&cbind() Fuction

table() counts the different factor levels

> library(MASS)
> school <- painters$School
> painters
                Composition Drawing Colour Expression School
Da Udine                 10       8     16          3      A
Da Vinci                 15      16      4         14      A
Del Piombo                8      13     16          7      A
Del Sarto                12      16      9          8      A
Fr. Penni                 0      15      8          0      A
Guilio Romano            15      16      4         14      A
Michelangelo              8      17      4          8      A
Perino del Vaga          15      16      7          6      A
......

Loading test data set.

> school.freq <- table(school)
> school.freq
school
 A  B  C  D  E  F  G  H 
10  6  6 10  7  4  7  4 

cbind() function takes a sequence of vector, matrix or data.frame and combine columns and rows respectively.

> cbind(school.freq)
  school.freq
A          10
B           6
C           6
D          10
E           7
F           4
G           7
H           4