まず，普通にプロット g <- ggplot() g <- g + geom_point(data=diamonds, aes(carat, price)) print(g) x軸をlogスケールに，y軸を逆数にする g <- g + coord_trans(xtrans="log", ytrans="inverse") print(g) 目盛の位置はそのままに，スケールだけ変わっ…