1

我设法用 4 个不同的图表创建了一个图。但是轴标签不显示。由于我是 R 的初学者,如果有人能告诉我如何在这种情节中添加轴标签,我将不胜感激。X轴:度数 Y轴:对数(累积分布)

该图使用 igraph-Functions。

这是图表: 在此处输入图像描述 这是我的代码:

par(mar = rep(2, 4))  
par(mfrow=c(2,2))               
ddU <- degree.distribution(USAN_g_num, cumulative=TRUE, mode="in")
plot(ddU,  log="xy", col=ifelse(degree.distribution(USAN_g_num, cumulative=FALSE,     mode="in")==0 ,'white',"black"), 
 pch=ifelse(degree.distribution(USAN_g_num, cumulative=FALSE, mode="in")==0 ,10,20),
 cex=ifelse(degree.distribution(USAN_g_num, cumulative=FALSE, mode="in")==0 ,0,1),xlab="degree", ylab="log(cumulative frequency)",main="USAN") 

  ddS <- degree.distribution(SAg, cumulative=TRUE, mode="in")
  plot(ddS,  log="xy", col=ifelse(degree.distribution(SAg, cumulative=FALSE, mode="in")==0 ,'white',"black"),   
     pch=ifelse(degree.distribution(SAg, cumulative=FALSE, mode="in")==0 ,10,20),
     cex=ifelse(degree.distribution(SAg, cumulative=FALSE, mode="in")==0 ,0,1),xlab="degree", ylab="log(cumulative frequency)",main="SA") 

  ddO <- degree.distribution(OWg, cumulative=TRUE, mode="in")
  plot(ddO,  log="xy", col=ifelse(degree.distribution(OWg, cumulative=FALSE, mode="in")==0 ,'white',"black"),  
    pch=ifelse(degree.distribution(OWg, cumulative=FALSE, mode="in")==0 ,10,20),
    cex=ifelse(degree.distribution(OWg, cumulative=FALSE, mode="in")==0 ,0,1),xlab="degree", ylab="log(cumulative frequency)",main="OW") 

  ddT <- degree.distribution(STg, cumulative=TRUE, mode="in")
  plot(ddT,  log="xy", col=ifelse(degree.distribution(OWg, cumulative=FALSE, mode="in")==0 ,'black',"black"),  
    pch=ifelse(degree.distribution(STg, cumulative=FALSE, mode="in")==0 ,10,20),
    cex=ifelse(degree.distribution(STg, cumulative=FALSE, mode="in")==0 ,0,1),xlab="degree", ylab="log(cumulative frequency)",main="ST")

谢谢

4

1 回答 1

2

您看不到 x 和 y 轴标签,因为您使用 为绘图的底部和左侧设置了太窄的边距mar=。尝试将其增加到 4 或更高。

par(mar = c(4,4,2,2))  
par(mfrow=c(2,2))
plot(1:10,xlab="mm",ylab="kk")
plot(1:10,xlab="mm",ylab="kk")
plot(1:10,xlab="mm",ylab="kk")
plot(1:10,xlab="mm",ylab="kk")
于 2013-05-01T14:31:42.157 回答