求对应组合的频率
> price <- c(20,12,25,10)
> weight <- c(100,200,50,500)
#不同重量规格的水果对应的不一样的价格,可以对这种实际情况进行统计
> table(weight,price)
price
weight 10 12 20 25
50 0 0 0 1
100 0 0 1 0
200 0 1 0 0
500 1 0 0 0
> age <- c(21,24,36,34,21,25,34,36)
> gender <- c('F','F','M','M','M','F','F','F')
> people <- data.frame(age,gender)
> #将部门里人员的年龄和性别存放到一个数据框里,可以直接将数据框指表
> table(people)
gender
age F M
21 1 1
24 1 0
25 1 0
34 1 1
36 1 1