1

私は何かをプロットするために次のコードを持っています。結果も表示します。私の質問は、線を目盛りと同期させたいということです。

何かアドバイスはありますか？

御時間ありがとうございます。

g <- qplot(hora, puntual, colour=part, data=x, group=part) +
geom_line() +
geom_pointrange(aes(ymin = inf, ymax = sup)) +
scale_color_manual(values=c("red", "green")) + 
scale_y_continuous(breaks=seq(1, 55, 0.5)) + 
opts(panel.background = theme_rect(fill='white', colour='gray'))
jpeg("plot.jpg", width=800, height=800)
print(g)
dev.off()

追跡するには：これは私が読んでいるDFです（抜粋）

72000,   40.920,  44.478,
72010,   41.197,  42.212,
72020,   41.462,  41.893,
72030,   41.523,  41.759,
72045,   41.509,  41.725,
72050,   41.504,  41.719,
72055,   40.920,  44.478,

最初の列はX、2番目と3番目はjpgサンプルに赤で示されている間隔です。

結果

4

1 に答える 1

1

あなたの例はまだ再現可能にはほど遠いです。再現性を求めるとき、私たちは難しいことをしようとはしていません。あなたはランダムな見知らぬ人にあなたを助けるために彼らの日（週末に！）から時間をとるように頼んでいることを覚えておいてください。できるだけ多くの作業を前もって行うのはあなたにとって礼儀正しいことです。コードをコピーして貼り付け、クリーンなRセッションで実行して何が起こっているかを確認できれば、質問に時間を割く可能性が高くなります。これが私が意味することです：

再現可能なデータを作成します。

dat <- data.frame(x = 1:10,y = sample(10,10,replace = TRUE))

それは一行で、回答者の生活をとても楽にしてくれます。再現可能な例を提供するようにお願いするもう1つの理由は、そうすることで自分の問題を解決できることがよくあるからです。

この再現可能な例を開発するプロセスを経て、私は最初にこのプロットを作成しました。

ggplot(dat,aes(x = x,y = y)) + 
    geom_point() + 
    scale_y_continuous(breaks = seq(1,10,0.5))

ここに画像の説明を入力してください

すべてがうまく見えますよね？ただし、デフォルトのパネルの背景は灰色であるため、グリッド線は白であることに注意してください。この時点で頭の中で警報ベルが鳴っているはずです...

次に私はこれをプロットしました：

ggplot(dat,aes(x = x,y = y)) + 
    geom_point() + 
    scale_y_continuous(breaks = seq(1,10,0.5)) + 
    opts(panel.background = theme_rect(fill='white', colour='gray'))

ここに画像の説明を入力してください

「グリッド線」は実際にはグリッド線ではないことに注意してください。彼らはあなたのtheme_rect背景の境界です。これは、2Dオブジェクトの色を指定したときに発生します。境界線は色付きです。

この時点で、グリッド線の色を変更するだけでよいことに気付きました。

ggplot(dat,aes(x = x,y = y)) + 
    geom_point() + 
    scale_y_continuous(breaks = seq(1,10,0.5)) + 
    opts(panel.background = theme_rect(fill='white', colour='gray'),
         panel.grid.minor = theme_blank(),
         panel.grid.major = theme_line(colour = "grey80"))

ここに画像の説明を入力してください

マイナーグリッドラインを削除し、メジャーグリッドラインのtheme_blank色を変更しました。彼らはいつもそこにいて、ただ白く描かれていました！

したがって、ここでの教訓は、再現可能な例を作成することは、私たちの回答者が怠惰であるだけではないということです...それはあなたにも利益をもたらします！:)

于 2012-06-16T20:39:44.660 に答える