Saya telah menggunakan ggplotperintah berikut : ggplot(survey, aes(x = age)) + stat_bin(aes(n = nrow(h3), y = ..count.. / n), binwidth = 10) + scale_y_continuous(formatter = "percent", breaks = c(0, 0.1, 0.2)) + facet_grid(hospital ~ .) + theme(panel.background = theme_blank()) untuk...
Saya ingin membuat anotasi beberapa teks pada aspek terakhir plot dengan kode berikut: library(ggplot2) p <- ggplot(mtcars, aes(mpg, wt)) + geom_point() p <- p + facet_grid(. ~ cyl) p <- p + annotate("text", label = "Test", size = 4, x = 15, y = 5) print(p) Tetapi kode ini membubuhi...
Saya membuat plot facetted untuk melihat nilai prediksi vs. nilai aktual secara berdampingan dengan plot nilai prediksi vs. residual. Saya akan menggunakan shinyuntuk membantu mengeksplorasi hasil upaya pemodelan menggunakan parameter pelatihan yang berbeda. Saya melatih model dengan 85% data,...
Data: df <- data.frame( type = c("T", "F", "P", "T", "F", "P", "T", "F", "P", "T", "F", "P"), size = c("50%", "50%", "50%", "100%", "100%", "100%", "150%", "150%", "150%", "200%", "200%", "200%"), amount = c(48.4, 48.1, 46.8, 25.9, 26, 24.9, 21.1, 21.4, 20.1, 20.8, 21.5, 16.5) ) Saya...
Saya mencoba membuat facet_multi_col()fungsi, mirip dengan facet_col()fungsi di ggforce- yang memungkinkan untuk tata letak segi dengan argumen ruang (yang tidak tersedia di facet_wrap()) - tetapi lebih dari beberapa kolom. Seperti pada plot terakhir di bawah ini (dibuat dengan grid.arrange()) saya...