现在位置: 首页 > R 教程 > 正文

R 向量

向量是 R 语言最基本的数据类型。

原子向量有6种类型:逻辑型(logical),整型(integer),双精度型(double),字符型(character),复数型(complex)和原始型(raw)。

创建向量

以下我们创建单个元素的向量,可以是以上 6 中类型中的任意一种:

实例

# 字符型原子向量
print("runoob");

# 双精度型原子向量
print(12.5)

# 整型原子向量
print(23L)

# 逻辑型原子向量
print(TRUE)

# 复数型原子向量
print(2+3i)

# 原始型原子向量
print(charToRaw('hello'))

执行以上代码输出结果为:

[1] "runoob"
[1] 12.5
[1] 23
[1] TRUE
[1] 2+3i
[1] 68 65 6c 6c 6f

以下我们创建多个元素的向量,数字之间使用冒号 : 运算符:

实例

# 创建 5 到 13 到系列
v <- 5:13
print(v)

# 创建 6.6 到 12.6 的系列
v <- 6.6:12.6
print(v)

# 如果最后一个元素不属于系列,就丢弃
v <- 3.8:11.4
print(v)

执行以上代码输出结果为:

[1]  5  6  7  8  9 10 11 12 13
[1]  6.6  7.6  8.6  9.6 10.6 11.6 12.6
[1]  3.8  4.8  5.8  6.8  7.8  8.8  9.8 10.8

我们也可以使用系列运算符 seq() 来创建向量。

以下实例我们创建 5 到 9 递增 0.4 的向量:

print(seq(5, 9, by = 0.4))

执行以上代码输出结果为:

[1] 5.0 5.4 5.8 6.2 6.6 7.0 7.4 7.8 8.2 8.6 9.0

c() 函数可以把非字符的元素转换为字符:

实例

# 数字和逻辑字符将转化为字符类型
s <- c('apple','red',5,TRUE)
print(s)

执行以上代码输出结果为:

[1] "apple" "red"   "5"     "TRUE" 

访问向量元素

访问向量元素可以使用中括号 [],索引值从 1 开始(跟其他编程语言不太一样),如果索引为负数,则会删除该位置的元素,TRUE,FALSE 或 0 和 1。

实例

# 使用索引访问向量元素
t <- c("Sun","Mon","Tue","Wed","Thurs","Fri","Sat")
u <- t[c(2,3,6)]
print(u)

# 使用逻辑索引,TRUE 表示读取,FALSE 为不读取
v <- t[c(TRUE,FALSE,FALSE,FALSE,FALSE,TRUE,FALSE)]
print(v)

# 第二个和第五个会被删除
x <- t[c(-2,-5)]
print(x)

# 使用 0/1 索引,1 表示读取,0 为不读取
y <- t[c(0,0,0,0,0,0,1)]
print(y)

执行以上代码输出结果为:

[1] "Mon" "Tue" "Fri"
[1] "Sun" "Fri"
[1] "Sun" "Tue" "Wed" "Fri" "Sat"
[1] "Sun"

向量运算

我们可以对两个长度相同的向量进行相加,相减,相乘或相除等操作,结果同样以向量输出。

实例

# 创建两个向量
v1 <- c(3,1,4,5,0,12)
v2 <- c(5,11,9,8,1,22)

# 相加
add.result <- v1+v2
print(add.result)

# V相减
sub.result <- v1-v2
print(sub.result)

# 相乘
multi.result <- v1*v2
print(multi.result)

# 相除
divi.result <- v1/v2
print(divi.result)

执行以上代码输出结果为:

[1]  8 12 13 13  1 34
[1]  -2 -10  -5  -3  -1 -10
[1]  15  11  36  40   0 264
[1] 0.60000000 0.09090909 0.44444444 0.62500000 0.00000000 0.54545455

循环向量

如果两个元素的向量长度不一样,较短的会循环自身的元素,直到与长的向量元素一致。

实例

v1 <- c(1,8,7,5,0,12)
v2 <- c(5,6)
# V2 变成 c(5,6,5,6,5,6)

add.result <- v1+v2
print(add.result)

sub.result <- v1-v2
print(sub.result)

执行以上代码输出结果为:

[1] 6 14 12 11 5 18 [1] -4 2 2 -1 -5 6

向量排序

我们可以使用 sort() 函数对向量进行排序:

实例

v <- c(2,11,6,5,0,21, -7, 111)

# 排序
sort.result <- sort(v)
print(sort.result)

# decreasing 参数 TRUE 设置为降序,默认为 FALSE 为升序
revsort.result <- sort(v, decreasing = TRUE)
print(revsort.result)

# 对字符类型进行排序
v <- c("Runoob","Google","Zhihu","Facebook")
sort.result <- sort(v)
print(sort.result)

# 降序
revsort.result <- sort(v, decreasing = TRUE)
print(revsort.result)

执行以上代码输出结果为:

[1]  -7   0   2   5   6  11  21 111
[1] 111  21  11   6   5   2   0  -7
[1] "Facebook" "Google"   "Runoob"   "Zhihu"   
[1] "Zhihu"    "Runoob"   "Google"   "Facebook"