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"