[解決済み] ggplot scale_x_datetime による軸のラベルと限界値
2022-02-12 16:02:37
質問
日付、曜日、時間をX軸のラベルにしたグラフをきれいに表示したいのですが、どうすればいいですか?
test <- data.frame(date=seq(as.POSIXct("2012-02-09 00:00:00",tz="CET"),as.POSIXct("2012-02-11 00:00:00",tz="CET"),"hours" ),
value= runif(49) )
ggplot() + geom_line(data=test, aes(x=as.POSIXct(date), y=value)) +
theme(text=element_text(size=16),
legend.text=element_text(size=16),
axis.text=element_text(size=16, colour="black"),
panel.background = element_rect(fill = 'white', colour = 'black'),
axis.title.y = element_text(size=16, vjust = 0.3),
axis.title.x = element_text(size=16, vjust = 0),
legend.key=element_rect(fill="white")) +
scale_x_datetime( breaks = date_breaks("1 days"), labels = date_format("%a-%d\n%H:%M", tz="CET"),
,limits = c(as.POSIXct("2012-02-09 00:00:00 CET"),as.POSIXct("2012-02-11 00:00:00 CET")))
MWEに含まれるscale_x_datetimeを含めると、以下のようになります。
いくつかの問題・疑問があります。
1) 左側と右側にある空白を取り除くにはどうしたらよいですか?limits()の定義がうまくいきません。
2) 表示される時間(時)、言い換えれば、どのタイムスタンプでラベルを配置するかを設定するにはどうすればよいですか。
3) このようにタイムスタンプを変更すると
test <- data.frame(date=seq(as.POSIXct("2012-02-09 00:59:00",tz="CET"),as.POSIXct("2012-02-11 00:59:00",tz="CET"),"hours" ),
value= runif(49) )
というメッセージが表示され、プロット結果はタイムスタンプが00分と表示されます。これを変更する方法はありますか?
解決方法は?
日付時刻のベクトルを作り、それを
breaks
引数で指定します。以下、私はこれを
seq
.
設定
expand = c(0, 0)
ggplot が余分なスペースを与えないようにします。
ggplot(data = test, aes(x = as.POSIXct(date), y = value)) +
geom_line() +
scale_x_datetime(
breaks = seq(as.POSIXct("2012-02-09 00:59:00 CET"),
as.POSIXct("2012-02-11 00:59:00 CET"), "8 hours"),
labels = date_format("%a-%d\n%H:%M", tz = "CET"),
expand = c(0, 0),
limits = c(
as.POSIXct("2012-02-09 00:00:00 CET"),
as.POSIXct("2012-02-11 00:00:00 CET")
)
)
関連
-
[解決済み】R: 複数行の ggplot2 コマンドで「単項演算子エラー」が発生する。
-
[解決済み】'builtin'型のオブジェクトはsubsetableではない【重複
-
[解決済み] Stataバージョン5-12の.dtaファイルではない
-
[解決済み】「次のオブジェクトは 'package:xxx' からマスクされています」とはどういう意味ですか?
-
[解決済み] ggplotの凡例(テキスト)ラベルを編集する
-
[解決済み] ggplot2 の軸ラベルを回転させ、間隔を空ける
-
[解決済み】2つのy軸を左右に持ち、異なるスケールを持つggplot
-
[解決済み】軸の目盛りを増やしたい
-
[解決済み] ggplotで軸の数字の書式を変更するには?
-
[解決済み] ggplot2 の facet_wrap と scales = "free" による各軸の限界値の設定
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み】プロット時に 'x' と 'y' の長さが異なる ERROR が発生する。
-
[解決済み】apply()とadply()の出力が異なる件)
-
[解決済み】x[[i]]でのエラー:レベル2で再帰的インデックス作成に失敗した
-
[解決済み】ggplot boxplotでPosition-dodge警告?
-
[解決済み】R ggplot2 で scale_x_discrete を使用する。
-
[解決済み】R Markdown - html出力でフォントサイズとフォントタイプを変更する
-
[解決済み】「Error in stripchart.default(x1, ...) : invalid plotting method」エラーを回避する方法は?
-
[解決済み] ヒートマップ作成時のエラー - 外部関数呼び出しでNA/NaN/Inf (arg 11)
-
[解決済み】forループを実行すると「要因のレベルセットが異なる」というエラーが発生する
-
[解決済み】'NULL'型の非(リストまたはベクトル)に適用されるis.na()は何を意味するのか?