for(i in 1:5)
x[[i]] <- paste0("x", i)
或者使用apply函数:
x <- apply(x, 2, function(x){paste0("x", x)})
你好!#y是x的拷贝
y
<-
x
#取得x的行数
l
<-
dim(x)[1]
#遍历每一行,如果该行最大值小于10,则从y中去除
for(
i
in
1
:
l)
{
if(
max(y[i,])
<
10)
y
<-
y[-i,]
}
如有疑问,请追问。
关于这个问题,可以设置par里面的参数:先把原始数据的范围向外扩大4%,然后用这个范围画坐标轴;另外一种取值’i’表示直接使用原始数据范围;实际上还有其它的坐标轴范围计算方式,但是鉴于它们目前在R中都尚未生效,所以暂不加介绍
plot(x, x)par(xaxs = "i", yaxs = "i")plot(x, x)