R语言属性知识点总结及实例

属性(attribute):R中对象具备的特性

特性描述了所代表的内容以及R解释该对象的方式

很多时候两个对象之间的唯一差别在于它们的属性不同

常见的属性

查询R中对象的属性的标准方法:

对于对象x和属性a:一般来说可以通过a(x)来查询x的a属性

大多数情况下,R中都有一个现成的获取对象属性或者改变对象属性的函数

(这种改变对象属性的方法会在当前环境中覆盖对象的旧属性,但不会影响闭环境中的变量属性)

m = matrix(data = 1:12, nrow = 4, ncol = 3,
      dimnames = list(c("r1", "r2", "r3", "r4"),
              c("c1", "c2", "c3")))

通过attributes函数可以获得一个包含对象所有属性的列表

> attributes(m)
$dim
[1] 4 3

$dimnames
$dimnames[[1]]
[1] "r1" "r2" "r3" "r4"

$dimnames[[2]]
[1] "c1" "c2" "c3"

> dim(m)
[1] 4 3
> dimnames(m)
[[1]]
[1] "r1" "r2" "r3" "r4"

[[2]]
[1] "c1" "c2" "c3"

> colnames(m)
[1] "c1" "c2" "c3"
> rownames(m)
[1] "r1" "r2" "r3" "r4"

可以通过改变属性将矩阵转化为其他类的对象

例如移除对象的维度属性

> 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"

创建一个数组

> (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

定义一个包含相同对象的向量

> (b <- 1:12)
 [1] 1 2 3 4 5 6 7 8 9 10 11 12

问题:在R总这两个对象等价吗?

> a == b
   [,1] [,2] [,3] [,4]
[1,] TRUE TRUE TRUE TRUE
[2,] TRUE TRUE TRUE TRUE
[3,] TRUE TRUE TRUE TRUE

数组的每个元素反映的是对两个对象个元素比较的结果

R中all.equal函数

用来比较两个对象的数据和维度一甄别两个对象是否近乎相同,若不相同则会返回其原因

> 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函数

> identical(a, b)
[1] FALSE

类

对于简单类型,其类和类型是有紧密联系的

对于符合型对象,两者则可能不同

有时候,对象的类会随着属性列出.

不过,对于确定的类型(比如矩阵和数组),类是隐藏的.

可以用class函数来确定对象的类

可以用typeof函数查看对象的基本类型

可以改变R对象所属的类.

例如,因子型向量转换为整型数组,整型数组,转换为因子

> (eye.colors <- factor(c("brown", "blue", "blue", "green", "brown", "brown", "brown")))
[1] brown blue blue green brown brown brown
Levels: blue brown green
> (eye.colors.integer.vector <- unclass(eye.colors))
[1] 2 1 1 3 2 2 2
attr(,"levels")
[1] "blue" "brown" "green"

> 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 what
Levels: what who why

在调用class函数或者typedef函数时,对于有些对象,需要对其进行引用以防止其在调用时被执行

例如:想要查询符号x,而不是x所指向的对象的类型

> class(quote(v))
[1] "name"
> typeof(quote(v))
[1] "symbol"

但并不是所有类型的对象都可以采用该操作

例如:R中的any对象,...对象,字符串对象和允诺对象不能被隔离

(查看允诺对象的类型时会要求执行该允诺对象,而这一过程会把它转换为普通对象,从而使我们无法查询到其类型信息)

到此这篇关于R语言属性知识点总结及实例的文章就介绍到这了,更多相关R语言属性内容请搜索我们以前的文章或继续浏览下面的相关文章希望大家以后多多支持我们！