0

このソリューションは死んでいるようです。9 年と 10 か月前に回答がありましたが、その時までに、その間にいくつかの更新で置き換えることができます。ここで、例として、この質問dputの を使用したいと思います(これは私のデータです)。プロットを作成するためのコードの現在のバージョンは次のようになります。

ggplot(GoatMerged, aes(date, goat_pos, color = as.factor(GoatName))) +
geom_line() +
scale_x_datetime(date_breaks = '1 day') + 
labs(color = 'Goats', x='Time', y='Positions') +
theme(axis.text=element_text(size=6)) +
#theme(aspect.ratio=16/9) +
#coord_fixed(ratio=3/4) +
#theme(axis.title.y = element_text(size=40, vjust=2)) +
#theme(axis.title.x = element_text(size=40, vjust=-0.05)) +
theme_classic()
ggsave(filename="GoatPositionBosca.pdf", device = "pdf", width = 12, height = 7, units = "cm")

コメントアウトされている行は、私の他の試みがプロットを機能させようとしていることを示しています。現在、Windows の R GUI では、出力は次のようになります。

RGUIアウトプット

ただし、ggsave を使用した後の出力では、次のdevice = "pdf"結果が得られます。

PDF出力

ご覧のとおり、x 軸の数値ラベルが重なっています。element_textlikeを使用してさまざまなオプションを試しsizeたりvjust、ggsave に無視されたりしました。

これは、次の質問につながります。

device = "pdf"x軸の数値ラベルが歪まないようにggsaveを使用するには?


編集

@elielink からのコメントのおかげで、いくつかの変更を加えることができ、そうすることで他の何かを実装することもできました。

ggplot(GoatMerged, aes(date, goat_pos, color = as.factor(GoatName))) +
geom_line() +
scale_x_datetime(date_breaks = '1 day', guide = guide_axis(n.dodge = 2)) + 
labs(color = 'Goats', x='Time', y='Positions') +
theme_classic() +
theme(axis.text=element_text(size=6)) +
theme(legend.position = "bottom")
ggsave(filename="GoatPositionBosca.pdf", device = "pdf", width = 12, height = 9, units = "cm")

その結果が得られます:

PDF2アウトプット

ここでは、PDF が x 軸の番号付けラベルの右側をカットしているため、ラベル付けがまだ歪んでいることがわかります。

4

1 に答える 1