数据框

————————————————————

矩阵形式，二维关系，每一列都是一个数据类型，每一行是一个观测值。

> d <- data.frame(name = c("张", "王", "李", "赵"),
+                 age = c(10,11,12,13),
+                 height = c(170,181,190,173),
+                 gender = c("m", "f", "f", "m"))
> d
  name age height gender
1   张  10    170      m
2   王  11    181      f
3   李  12    190      f
4   赵  13    173      m

as.data.frame()强制转数据框

数据框的引用：

1.d[1,2]

2.[[]],$

> d[1,2]
[1] 10
> d$name
[1] 张 王 李 赵
Levels: 李 王 张 赵
> d[[1]]
[1] 张 王 李 赵
Levels: 李 王 张 赵
> names(d)
[1] "name"   "age"    "height" "gender"
> rownames(d)
[1] "1" "2" "3" "4"
> colnames(d)
[1] "name"   "age"    "height" "gender"

> d[d$height > 173, ]
  name age height gender
2   王  11    181      f
3   李  12    190      f

> d[d$height == 173, ]
  name age height gender
4   赵  13    173      m

> table(d[4])

f m 
2 2 

> tapply(d[[3]], d[[4]], mean)
    f     m 
185.5 171.5 

attach()函数可以把数据框链接如当前的名字空间

> d$r <- d$height/d$age
> d
  name age height gender        r
1   张  10    170      m 17.00000
2   王  11    181      f 16.45455
3   李  12    190      f 15.83333
4   赵  13    173      m 13.3076

d$r <- NULL

删除一列