ログプロットの場合、データを変更する必要はありません。これは表示の問題ですので、データをさらに処理することができます。ただ、一例として:
set.seed(2)
x = c(1, rnorm(100, 15, 50))
y = c(1, rnorm(100, 15, 50))
plot(x, y, col = "black",
log = "xy", xaxt = "n", yaxt = "n",)
# Labels...
at.y <- outer(1:9, 10^(log10(1):log10(100)))
lab.y <- ifelse(log10(at.y) %% 1 == 0,
sapply(at.y, function(i)
as.expression(bquote(10^.(log10(i))))
), NA)
axis(2, at = at.y, labels = lab.y, las = 1)
at.x <- outer(1:9, 10^(0:log10(100)))
lab.x <- ifelse(log10(at.x) %% 1 == 0,
sapply(at.x, function(i)
as.expression(bquote(10^.(log10(i))))
), NA)
axis(1, at = at.x, labels = lab.x, las = 1)
grid (NULL,NULL, lty = 6, col = "cornsilk2")
結果:
私は意味...ちょうどあなたの二つのグラフを比較します。ヒント:軸を見てください。 –
申し訳ありませんが、私の質問が悪いと感じたらしかし、私のことを信じてください。それはあなたには分かりますが、私には分かりません。 –
私が理解していないのは軸です。プロット(log(x)、log(x))では、x軸とy軸の値は正確にlog(x)とlog(y)の値になります。しかし、なぜlog = "xy"のプロットの値が違うのですか? –