Question

我正在使用下面的代码创建一个情节，但我想改变以下三件事并且到目前为止没有成功：

显然，盒子放错了地方，我怎样才能把盒子放在不与斑块线重叠的地方？
如何使线条（图中的蓝色和金色）更粗？无论我尝试什么都没有效果
在哪里可以更改字体的大小（轴标签，以及框和主标签中的说明）。我知道这是用par完成的，但不知道究竟在哪里

由于

blocked <- c(199.80248,  76.67856,  71.21770)
random <- c(193.31283,  99.37955, 104.22490)

g_range <- range(0, blocked, random)


plot(blocked, type="o", col="lightblue", ylim=g_range, 
     axes=FALSE, ann=FALSE)


axis(1, at=1:3, lab=c("Pretest","Posttest", "Retention"))


axis(2, las=1, at=40*0:g_range[2])


box()


lines(random, type="o", pch=22, lty=2, col="gold")

title(main="Radialer Fehler der geblockten und variablen Gruppen", col.main="black", font.main=2)


title(xlab="Test", col="black")
title(ylab="radialer Fehler (mm)", col="black")


legend(1.1, g_range[2], c("geblockt","variabel"), cex=0.7, 
       col=c("lightblue","gold"), pch=2:3, lty=2:3);

Answer 1

您可以使用par或每次调用绘图函数来修改图形参数，即plot，lines ...

要获取所有图形参数的列表，只需键入par()。

即可

关于您的问题，您可以使用图形参数lwd使线条更粗，输入第一个par(lwd = 1.5)（或更低/更高，使用它来查看结果）或每次调用时：< / p>

plot(blocked, type="o", col="lightblue", ylim=g_range, axes=FALSE, ann=FALSE, lwd = 1.5)
lines(random, type="o", pch=22, lty=2, col="gold", lwd = 1.5)

字体大小的图形参数为cex。您还可以使用参数topright，topleft等更改图例的位置。：

legend("topleft",...)

线条的粗细，图中方框的位置

1 个答案: