例如,如果我需要在阴谋中遮蔽两个区域
x<-rep(1:10)
plot(x,type="h")
我需要以1到3和7到10之间的区域为例,
我使用这个命令,但它省略了绘图线.
usr <- par('usr')
rect(1, usr[3], 3, usr[4], col='green')
例如,我需要对每两列进行求和
x1 x2 x3 x4
12 2 3 7
1 4 6 5
我需要
X1 X2
14 10
5 11
我试过应用函数,我试过这个函数mat是一个矩阵
mat1=matrix()
for(i in 1:nrow(mat)){
for(j in 1:ncol(mat)){
mat1[i,j]=mat[j,i]+mat[j,i+1]
}}
我有
mat1 <- matrix(c(1,2,3,4,5,6), ncol=2)
colnames(mat1) <- c("Soa","Nor")
mat2 <- matrix(c(1,0,1,1,0), nrow=1)
colnames(mat2) <- c("reman","jak","Soa","Alein","Nor")
我需要得到这个矩阵
Soa Nor
1 4
2 5
3 6
1 0
我用这个，但不适用于列
merge(mat1,mat2, by="row.names", all = TRUE)