属性(attribute):R中对象具备的特性
特性描述了所代表的内容以及R解释该对象的方式
很多时候两个对象之间的唯一差别在于它们的属性不同
常见的属性
| 属性 | 描述 |
|---|---|
| class | 对象的类 |
| comment | 对象的注释,一般用于描述对象的含义 |
| dim | 对象的维度 |
| dimnames | 与对象的每个维度相关的名字 |
| names | 返回对象的名字属性.返回结果取决于对象的类型.对于数据框对象会返回数据框的列名;对于数组会返回数组中被命名元素的名字 |
| row,names | 对象的行名(dimnames相关) |
| tsp | 对象的起始点,对于时间序列对象有用 |
| levels | 因子型变量的水平 |
查询R中对象的属性的标准方法:
对于对象x和属性a:一般来说可以通过a(x)来查询x的a属性
大多数情况下,R中都有一个现成的获取对象属性或者改变对象属性的函数
(这种改变对象属性的方法会在当前环境中覆盖对象的旧属性,但不会影响闭环境中的变量属性)
|
1
2
3
|
m = matrix(data = 1:12, nrow = 4, ncol = 3, dimnames = list(c("r1", "r2", "r3", "r4"), c("c1", "c2", "c3"))) |
通过attributes函数可以获得一个包含对象所有属性的列表
|
1
2
3
4
5
6
7
8
9
10
|
> attributes(m)$dim[1] 4 3$dimnames$dimnames[[1]][1] "r1" "r2" "r3" "r4"$dimnames[[2]][1] "c1" "c2" "c3" |
|
1
2
3
4
5
6
7
8
|
> dim(m)[1] 4 3> dimnames(m)[[1]][1] "r1" "r2" "r3" "r4"[[2]][1] "c1" "c2" "c3" |
|
1
2
3
4
|
> colnames(m)[1] "c1" "c2" "c3"> rownames(m)[1] "r1" "r2" "r3" "r4" |
可以通过改变属性将矩阵转化为其他类的对象
例如移除对象的维度属性
|
1
2
3
4
5
6
7
|
> dim(m) <- NULL> m [1] 1 2 3 4 5 6 7 8 9 10 11 12 > class(m)[1] "integer"> typeof(m)[1] "integer" |
创建一个数组
|
1
2
3
4
5
|
> (a <- array(1:12, dim = c(3:4))) [,1] [,2] [,3] [,4][1,] 1 4 7 10[2,] 2 5 8 11[3,] 3 6 9 12 |
定义一个包含相同对象的向量
|
1
2
|
> (b <- 1:12) [1] 1 2 3 4 5 6 7 8 9 10 11 12 |
问题:在R总这两个对象等价吗?
|
1
2
3
4
5
|
> a == b [,1] [,2] [,3] [,4][1,] TRUE TRUE TRUE TRUE[2,] TRUE TRUE TRUE TRUE[3,] TRUE TRUE TRUE TRUE |
数组的每个元素反映的是对两个对象个元素比较的结果
R中all.equal函数
用来比较两个对象的数据和维度一甄别两个对象是否近乎相同,若不相同则会返回其原因
|
1
2
3
4
|
> all.equal(a, b)[1] "Attributes: < Modes: list, NULL >" "Attributes: < Lengths: 1, 0 >" [3] "Attributes: < names for target but not for current >" "Attributes: < current is not list-like >" [5] "target is matrix, current is numeric" |
若只是检查两个对象是不是完全一致,但不关心原因可以使用identical函数
|
1
2
|
> identical(a, b)[1] FALSE |
类
对于简单类型,其类和类型是有紧密联系的
对于符合型对象,两者则可能不同
有时候,对象的类会随着属性列出.
不过,对于确定的类型(比如矩阵和数组),类是隐藏的.
可以用class函数来确定对象的类
可以用typeof函数查看对象的基本类型
可以改变R对象所属的类.
例如,因子型向量转换为整型数组,整型数组,转换为因子
|
1
2
3
4
5
6
7
|
> (eye.colors <- factor(c("brown", "blue", "blue", "green", "brown", "brown", "brown")))[1] brown blue blue green brown brown brownLevels: blue brown green> (eye.colors.integer.vector <- unclass(eye.colors))[1] 2 1 1 3 2 2 2attr(,"levels")[1] "blue" "brown" "green" |
|
1
2
3
4
5
6
|
> v <- as.integer(c(1, 1, 1, 2, 1, 1, 2, 2, 3, 1))> levels(v) <- c("what", "who", "why")> class(v) <- "factor"> v [1] what what what who what what who who why whatLevels: what who why |
在调用class函数或者typedef函数时,对于有些对象,需要对其进行引用以防止其在调用时被执行
例如:想要查询符号x,而不是x所指向的对象的类型
|
1
2
3
4
|
> class(quote(v))[1] "name"> typeof(quote(v))[1] "symbol" |
但并不是所有类型的对象都可以采用该操作
例如:R中的any对象,...对象,字符串对象和允诺对象不能被隔离
(查看允诺对象的类型时会要求执行该允诺对象,而这一过程会把它转换为普通对象,从而使我们无法查询到其类型信息)
到此这篇关于R语言属性知识点总结及实例的文章就介绍到这了,更多相关R语言属性内容请搜索服务器之家以前的文章或继续浏览下面的相关文章希望大家以后多多支持服务器之家！
原文链接：https://www.kancloud.cn/sacomplex/rlanguage/316837
