如何在r中更改x和y轴的刻度,最小值和最大值?

时间:2016-11-03 22:56:19

标签: r plot axes

我似乎无法弄清楚将x轴和y轴更改为200-800的命令,增量为100.(R新增,不知道如何提供大量数据)

     SAT <- read.csv(file.choose(), header = TRUE)
    SAT2 <- na.exclude(SAT)
    SAT.MV <- SAT2[,1:2]
    plot(SAT.MV$VSAT,SAT.MV$MSAT,main="Math and Verbal SAT Scores",xlab="Verbal Score",
ylab="Math Score")
    head(SAT.MV)
    SAT.MV.3means <- kmeans(SAT.MV,centers=3)
    SAT.MV.3means$centers
    SAT.MV.3means$cluster
    plot(SAT.MV[SAT.MV.3means$cluster == 1, ], col = "red", 
         xlim=c(min(SAT.MV[ ,1]),max(SAT.MV[ ,1])),
         ylim=c(min(SAT.MV[ ,2]),max(SAT.MV[ ,2])))
    points(SAT.MV[SAT.MV.3means$cluster == 2,], col = "blue")
    points(SAT.MV[SAT.MV.3means$cluster == 3,], col = "seagreen")
    points(SAT.MV.3means$centers,pch=2, col = "black")
            plot(SAT.MV[SAT.MV.3means$cluster == 1, ], col = "red", 
             xlim=c(min(SAT.MV[ ,1]),max(SAT.MV[ ,1])),
             ylim=c(min(SAT.MV[ ,2]),max(SAT.MV[ ,2])))
        points(SAT.MV[SAT.MV.3means$cluster == 2,], col = "blue")
        points(SAT.MV[SAT.MV.3means$cluster == 3,], col = "seagreen")
        points(SAT.MV.3means$centers,pch=2, col = "black")

1 个答案:

答案 0 :(得分:2)

假设我有一个小数据集:

dd <- data.frame(x=c(300,700,1000),y=c(-100,200,700))

我想在一组可能与数据规模不匹配的比例上绘制这些数据(也就是说,R的自动规则可能无法正常工作)。

## xlim, ylim set bounds: axes=FALSE turns off axes
plot(y~x,data=dd,xlim=c(200,800),ylim=c(200,800),axes=FALSE)

现在手动绘制轴:

ax <- seq(200,800,by=100)  ## same for both axes
axis(side=1,at=ax)         ## side=1 -> bottom
axis(side=2,at=ax)         ## side=2 -> left
box()  ## to draw the bounding box

在此示例中,数据集中除了一个点之外的所有点实际上都从图中排除:

enter image description here