Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/google-sheets/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
绘图:R:图例定位(单位)+字体_R_Graph - Fatal编程技术网

绘图:R:图例定位(单位)+字体

绘图:R:图例定位(单位)+字体,r,graph,R,Graph,我有以下几点 xaxis <- seq(0,1,by=0.01) aij <- sqrt(1 - (1-xaxis)**1.02) bij <- 1 - (1 - xaxis)**1.50 cij<-aij-bij pdf("MyPdf.pdf",family="Times New Roman") par(mfrow=c(1, 1), mar=c(5, 5, 4, 10)) plot(xaxis,aij,type="l", col="black",lty=1, xlab

我有以下几点

xaxis <- seq(0,1,by=0.01)
aij <- sqrt(1 - (1-xaxis)**1.02)
bij <- 1 - (1 - xaxis)**1.50 
cij<-aij-bij
pdf("MyPdf.pdf",family="Times New Roman")
par(mfrow=c(1, 1), mar=c(5, 5, 4, 10))
plot(xaxis,aij,type="l", col="black",lty=1, xlab="Size ratio", ylab="Value of function")
lines(xaxis,bij,type="l",col="black",lty=2)
par(new=TRUE)
plot(xaxis,cij,,type="l",col="black",lty=4,xaxt="n",yaxt="n",xlab="",ylab="")
grid(nx = 10, ny = 10)
axis(4)
mtext("Difference", side=4,line=3)
legend(x='bottomright',col=c("black","black"), lty=c(1,2,3), legend=c("aij","bij","Difference"),inset=c(-0.25,0))
dev.off()
我无法理解以下内容:

例如,如何指定图例的坐标,而不是右下角我希望有一个自己选择的位置-坐标系的单位是什么?坐标系的方向是什么? 如何正确定位文本? 是否可以在所有对象的绘图中使用粗体、时间字体?
这说明了如何使用用户坐标将图例移动到绘图坐标系中的特定位置。查看如何在PATH函数中为文本“字体”提供适当的值。我的pdf设备只有Times字体,因此我无法向您展示如何使用您描述的命名字体。您可以通过以下方式查看当前可用pdf字体的有效名称:

names(pdfFonts())

pdf("MyPdf.pdf", family="Times")
par(mfrow=c(1, 1), mar=c(5, 5, 4, 10))
plot(xaxis,aij,type="l", col="black",lty=1, xlab="Size ratio", ylab="Value of function")
lines(xaxis,bij,type="l",col="black",lty=2)
par(new=TRUE)
plot(xaxis,cij,,type="l",col="black",lty=4,xaxt="n",yaxt="n",xlab="",ylab="")
grid(nx = 10, ny = 10)
axis(4)
mtext("Difference", side=4,line=3)
legend(x=0.2,y=0.02, col=c("black","black"), lty=c(1,2,3), legend=c("aij","bij","Difference"), text.font=2 )
dev.off()