ggplot to png - 自動的に画像を伸ばします

Question

私はggplot plotを生成し、.pngイメージとして保存しています。 Rstudioで生成されたプロットはy軸の値に従って伸びますが、.pngとして保存すると正方形の画像が得られます。

.pngフォームで自動的に最適な伸張画像を取得する方法は？

# Function to store ggplot plot object as .png image file 
savePlot <- function(myPlot, filename) { 
    png(filename) 
    print(myPlot) 
    dev.off() 
} 

# ggplot object 
normalized_bar_plot = ggplot(dat, aes(factor(temp), norm, fill = type)) + 
    geom_bar(stat="identity", position = "dodge") + ylab("Normalized count")+xlab(features[i])+ 
    scale_fill_brewer(palette = "Set1") 

filename = paste0("image_", features[i], ".png") 
savePlot(normalized_bar_plot, filename) 

Answer 1

ggplot数字を節約するために、私はggsaveを使用します。デフォルトでは、プロットデバイスのサイズが選択されます。したがって、画面上のプロットデバイスで縦横比を正しく設定すると、保存された画像ファイルに変換されます。さらに、画像の幅、高さ、およびdpiの設定は、width,heightおよびdpi入力引数を使用してサポートされています。例えば

：

ggplot(dat, aes(factor(temp), norm, fill = type)) + 
    geom_bar(stat="identity", position = "dodge") + ylab("Normalized count")+xlab(features[i])+ 
    scale_fill_brewer(palette = "Set1") 
# ggsave will save the last generated image, it will also pick up which file format 
# to use from the file extension (e.g. png). 
ggsave('~/saved_image.png', width = 16, height = 9, dpi = 100)