生信入门（二）

1) 规范写法x 
# 查看xx[1] 1 4 6 9 0 4
2) 随意的写法x = c(1,4,6,9,0,4)
3) 赋值和输出（两个代码用";"分隔）x = c(1,4,6,9,0,4); x

'''向量的运算就是将里面的元素一个个拿出来进行计算。'''x 1,4,6,9,0,4)
x + 1# 2  5  7 10  1  5
log(x)#  0.000000 1.386294 1.791759 2.197225 -Inf 1.386294

'''向量的比较同向量的运算一样，将向量中的元素逐个取出，然后进行比较。向量里面有多少个元素，就返回多少个结果。'''x > 3# FALSE  TRUE  TRUE  TRUE FALSE  TRUE
x == 3# FALSE FALSE FALSE FALSE FALSE FALSE

max(x)    # 最大值
min(x)    # 最小值
mean(x)    # 平均值
median(x)  # 中位数
var(x)    # 方差
sd(x)    # 标准差
sum(x)    # 求和
length(x)  # 长度，向量的长度是指元素的个数# length()函数的小应用a q(2, 100, 3)paste0(rep('student', times=length(a)), a)# R语言函数思想：能用函数代替，就不要手动去数
unique(x)  # 去重，先来后到，从左往右
duplicated(x)  # 判断是否重复
table(x)  # 统计重复值
sort(x)    # 排序，返回的是排好后的值，默认是升序# 0 1 4 4 6 9sort(x,decreasing=T)  # 降序排列
arrange(x)  # dplyr包中的一个函数，
rank(x)"""rank(x, na.last = TRUE,     ties.method = c("average", "first", "last", "random", "max", "min"))   "first" 是最基本的排序，小数在前大数在后，相同元素先者在前后者在后。
　　"max" 是相同元素都取该组中最好的水平，即通常所讲的并列排序。
　　"min" 是相同元素都取该组中最差的水平，可以增大序列的等级差异。
　　"




    
average" 是相同元素都取该组中的平均水平，该水平可能是个小数。
　　"random" 是相同元素随机编排次序，避免了“先到先得”，“权重”优于“先后顺序”的机制增大了随机的程度。"""# 2.0 3.5 5.0 6.0 1.0 3.5
order(x)  # 返回的是排序好的索引# 5 1 2 6 3 4

x = c(1, 5, 9, 3, 6, 88)y = c(8, 5, 3, 4, 4, 6)x == y# FALSE  TRUE FALSE FALSE FALSE FALSE
y == x# FALSE  TRUE FALSE FALSE FALSE FALSE
x <= y# TRUE  TRUE FALSE  TRUE FALSE FALSE

x + y# 9 10 12  7 10 94
x**y# 1 3125 729 81 1296 464404086784

z = paste(x,y,sep='.')# "1.8"  "5.5"  "9.3"  "3.4"  "6.4"  "88.6"
as.numeric(z)  # 转换成数值型元素# 1.8  5.5  9.3  3.4  6.4 88.6
class(as.numeric(z))  # "numeric"

intersect(x, y)  # 交集union(x, y)    # 并集setdiff(x, y)  # 谁在前就取谁里面的，在x中扣除y中有的setdiff(y, x)  # 在y中减去x中的元素

x = c(5,8,6,4,7)y = c(3,1,9,8,5)x %in% y# TRUE  TRUE FALSE FALSE FALSE
y %in% x# FALSE FALSE FALSE  TRUE  TRU

x = 1:9y = 4:9x == ylength(x == y)  # 9'''[1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSEWarning message:In x == y : longer object length is not a multiple of shorter object length'''

# 以下两条命名输出的结果都是一样的。虽然两个向量的长度不一样，# 但因为循环补齐的原理，第二条命令也可以得到相同的结果。paste0(rep('x', times=8), seq(2,18,2))# "x2"  "x4"  "x6"  "x8"  "x10" "x12" "x14" "x16" "x18"
paste0('x', seq(2,18,2))# "x2"  "x4"  "x6"  "x8"  "x10" "x12" "x14" "x16" "x18"

# 向量的筛选x = c(3, 66, 88, 90, 87, 18, 28, 30, 58)x[x>33]x[x==88]
# 按照下标（索引）取子集x[8]x[c(1,8)]x[-1]

# 修改一个元素x[2] # 3 88 88 90 87 18 28 30 58