R- график двойной плотности

Question

Я сгенерировал набор данных с распределением степенных законов, используя пакет "poweRlaw" со следующим кодом:

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

Как я могу получить график log-log, где ось x показывает log(m), а ось y показывает log(freq(m)) для всех m в наборе данных?

Answer 1

Я получил решение:

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")

Answer 2

Я рекомендую 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()