title: "向量取子集和元素的修改方法"
output: html_document
date: "2023-03-09"
x <- 8:12
x[x==10]
## [1] 10
x[x<12]
## [1] 8 9 10 11
x[x %in% c(9,13)]
## [1] 9
x <- 8:12
x[4] #取第4个元素
## [1] 11
x[2:4] #取第2-4个元素
## [1] 9 10 11
x[c(1,5)] #取第1和第5个元素,不能写成x[1,5]
## [1] 8 12
x[-4] #反选,去掉第4个元素,其他全保留
## [1] 8 9 10 12
x[-(2:4)] #反选,去掉第2-4个元素,其他保留
## [1] 8 12
x <- 8:12
x[4] <- 40 #将第4个元素改为40
x
## [1] 8 9 10 40 12
x <- 8:12
x[c(1,5)] <- c(80,20) #将第1个和第5个元素分别改为80和20
x
## [1] 80 9 10 11 20
z = rnorm(n=10,mean=0,sd=18)
z
## [1] 15.080018 37.348448 -2.262640 23.519212 1.758657
## [6] -8.655105 21.539157 -10.966188 4.178155 5.302523
z[z<-2]
## [1] 37.34845
z
## [1] 2
z = rnorm(n=10,mean=0,sd=18)
z
## [1] -6.871995 -9.571287 -16.963835 3.243446 34.555115
## [6] 2.325657 -10.771052 11.820617 10.357968 -7.175953
z[z < -2] #方法1
## [1] -6.871995 -9.571287 -16.963835 -10.771052 -7.175953
z[z<(-2)] #方法2
## [1] -6.871995 -9.571287 -16.963835 -10.771052 -7.175953
引用自生信技能树
原创声明:本文系作者授权腾讯云开发者社区发表,未经许可,不得转载。
如有侵权,请联系 cloudcommunity@tencent.com 删除。
原创声明:本文系作者授权腾讯云开发者社区发表,未经许可,不得转载。
如有侵权,请联系 cloudcommunity@tencent.com 删除。