r - R- 双对数密度图

Question

我使用带有以下代码的“powerlaw”包生成了一个具有幂律分布的数据集：

library("poweRlaw")
xmin = 1; alpha = 1.5
con_rns = rplcon(1000, xmin, alpha)

如何获得对数图，其中 x 轴显示 log(m)，y 轴显示数据集中所有 m 的 log(freq(m))？

Answer 1

我推荐该ggplot2软件包，因为它易于学习、用途广泛且用途广泛。

#your code
library("poweRlaw")
xmin = 1; alpha = 1.5
con_rns = rplcon(1000, xmin, alpha)

#loading ggplot2
require(ggplot2)

#convert to data.frame format for ggplot2
df <- as.data.frame(con_rns)

#make plot with both axes log scale
ggplot(data = df, aes(x = con_rns)) + 
    geom_line(stat = 'bin', binwidth = 0.1) + 
    scale_x_log10() + 
    scale_y_log10()

Answer 2

我得到了解决方案：

library("poweRlaw")
xmin = 1; alpha = 1.5
x = rplcon(1000, xmin, alpha)
h <- hist(x, plot=F, breaks=c(seq(0,max(x)+1, .1)))
plot(h$counts, log="xy", pch=20, col="blue",xlab="Value", ylab="Frequency")