向量、矩阵和数组只能存储同一类型的数据
向量
生成向量
> a <- c(1,3);
> print(a);
[1] 1 3
> b <- seq(from=1,to=10, by=2);
> print(b);
[1] 1 3 5 7 9
> d <- rep(0,5);
> print(d);
[1] 0 0 0 0 0
> labs <- paste(c("X","Y"), 1:10, sep="") ;
> print(labs);
[1] "X1" "Y2" "X3" "Y4" "X5" "Y6" "X7" "Y8" "X9" "Y10"
插入/删除数据
> a <- c(2,3,4,5,6,7)
> append(a,10)
> #在最后面插入10这个数据
[1] 2 3 4 5 6 7 10
#这是a并没有被改变,因为没有被改变后赋值回去此时a还是c(2,3,4,5,6,7)
> a <- append(a,10)
> print(a)
[1] 2 3 4 5 6 7 10
#这样a才是c(2,3,4,5,6,7,10)
#后面的替换和删除同理,不赋值不改变
> append(a,8,after=3)
> #在第3个字符后面插入8
[1] 2 3 4 8 5 6 7 10
> a <- a[-c(2:3)]
> #删除调第2-3位的字符
> print(a)
[1] 2 5 6 7 10
替换数据
> replace(a,2,0)
>把第2个的值换为0
[1] 2 0 6 7 10
函数
> a <- c(1:10)
> sum(a)
> #求和
[1] 55
> max(a)
[1] 10
> min(a)
[1] 1
> range(a)
> #极值
[1] 1 10
> mean(a)
> #平均值
[1] 5.5
> var(a)
> #方差 方差sum公式((a-mean(a))^2/(n-1))
> #n是a中元素的个数
[1] 9.166667
> sort(a)
> #从小到大排序
[1] 1 2 3 4 5 6 7 8 9 10
> rev(a)
> 从大到小排序
[1] 10 9 8 7 6 5 4 3 2 1
> prod(a)
> #乘积
[1] 3628800
> prod(1:10)
> #prod(n:m)为n-m的阶乘,上面因为a的元素从1-10 所以计算结果是一样的
[1] 3628800
字符串
定义串
> s <- 'hello world!'
> strsplit(s,' ')
> #将以‘ ’分隔的元素分开存成列表,可以按任意字符切分(子串中不再含有该字符)
> #后面会存使用unlist函数将数据变为字符串向量方便后续计算
[[1]]
[1] "hello" "world!"
> unlist(strsplit(s,' '))
[1] "hello" "world!"
> unlist(strsplit(s,' '))[1]
[1] "hello"
> unlist(strsplit(s,' '))[2]
[1] "world!"
#此时的s是没有被改变的
连接字符串
> s2 <- 'this is r'
> paste(s,s2)
> #连接两个字符串会默认在串间加一个空格
[1] "hello world! this is r"
> paste(s,s2,sep='')
> #可以通过设置连接符为空来完成“无缝衔接”或指定其他的连接符号
[1] "hello world!this is r"
> paste0(s,s2,sep='')