{"id":475,"date":"2023-07-29T19:13:06","date_gmt":"2023-07-29T19:13:06","guid":{"rendered":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/"},"modified":"2023-07-29T19:13:06","modified_gmt":"2023-07-29T19:13:06","slug":"plot-benjolan-di-r-menggunakan-ggplot2","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/","title":{"rendered":"Cara mudah membuat plot relief di r menggunakan ggplot2"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\"><strong>Bagan tambahan<\/strong> adalah jenis bagan yang menunjukkan peringkat kelompok yang berbeda dari waktu ke waktu, bukan nilai absolut, untuk menekankan urutan kelompok, bukan jumlah perubahannya.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.<\/span><\/p>\n<h2> <strong><span style=\"color: #000000;\">Contoh: membuat grafik relief<\/span><\/strong><\/h2>\n<p> <span style=\"color: #000000;\">Untuk membuat diagram bump di R, pertama-tama kita perlu memuat dua paket: <strong>dplyr<\/strong> dan <strong>ggplot2<\/strong> :<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>library(ggplot2) <span style=\"color: #008080;\">#for creating bump chart<\/span>\nlibrary(dplyr) <span style=\"color: #008080;\">#for manipulating data<\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Selanjutnya, kita akan membuat beberapa data untuk digunakan:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong><span style=\"color: #008080;\">#set the seed to make this example reproducible<\/span>\nset.seed(10)\n\ndata &lt;- data.frame(team = rep(LETTERS[1:5], each = 10),\n                   random_num = runif(50),\n                   day = rep(1:10, 5))\n\ndata &lt;- data %&gt;%\n  group_by(day) %&gt;%\n  arrange(day, desc(random_num), team) %&gt;% \n  mutate(rank = row_number()) %&gt;%\n  A group()\n\nhead(data)\n\n# team random_num day rank          \n#1 C 0.865 1 1\n#2 B 0.652 1 2\n#3 D 0.536 1 3\n#4 A 0.507 1 4\n#5 E 0.275 1 5\n#6 C 0.615 2 1<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Basis data ini hanya menampilkan \u201cperingkat\u201d lima tim berbeda selama periode 10 hari.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Kita dapat menggunakan ggplot2 untuk membuat bagan kemajuan guna memvisualisasikan peringkat setiap tim setiap hari selama periode ini:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>ggplot(data, aes(x = day, y = rank, group = team)) +\n  geom_line(aes(color = team, alpha = 1), size = 2) +\n  geom_point(aes(color = team, alpha = 1), size = 4) +\n  scale_y_reverse(breaks = 1:nrow(data))<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Bagan tambahan ini menampilkan data dalam format yang Anda inginkan, tetapi cukup jelek. Dengan sedikit perubahan estetika kita bisa membuat lukisan ini menjadi lebih baik.<\/span><\/p>\n<h2> <strong><span style=\"color: #000000;\">Sesuaikan gaya grafis benjolan<\/span><\/strong><\/h2>\n<p> <span style=\"color: #000000;\">Untuk menyempurnakan tampilan grafik, kita dapat menggunakan tema berikut yang dibuat oleh <a href=\"https:\/\/dominikkoch.github.io\/Bump-Chart\/\" target=\"_blank\" rel=\"noopener\">Dominik Koch<\/a> :<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>my_theme &lt;- function() {\n\n  # Colors\n  color.background = \"white\"\n  color.text = \"#22211d\"\n\n  # Begin construction of chart\n  theme_bw(base_size=15) +\n\n    # Format background colors\n    theme(panel.background = element_rect(fill=color.background,\n                                          color=color.background)) +\n    theme(plot.background = element_rect(fill=color.background,\n                                          color=color.background)) +\n    theme(panel.border = element_rect(color=color.background)) +\n    theme(strip.background = element_rect(fill=color.background,\n                                          color=color.background)) +\n\n    # Format the grid\n    theme(panel.grid.major.y = element_blank()) +\n    theme(panel.grid.minor.y = element_blank()) +\n    theme(axis.ticks = element_blank()) +\n\n    # Format the legend\n    theme(legend.position = \"none\") +\n\n    # Format title and axis labels\n    theme(plot.title = element_text(color=color.text, size=20, face = \"bold\")) +\n    theme(axis.title.x = element_text(size=14, color=\"black\", face = \"bold\")) +\n    theme(axis.title.y = element_text(size=14, color=\"black\", face = \"bold\",\n                                          vjust=1.25)) +\n    theme(axis.text.x = element_text(size=10, vjust=0.5, hjust=0.5,\n                                          color = color.text)) +\n    theme(axis.text.y = element_text(size=10, color = color.text)) +\n    theme(strip.text = element_text(face = \"bold\")) +\n\n    # Plot margins\n    theme(plot.margin = unit(c(0.35, 0.2, 0.3, 0.35), \"cm\"))\n}<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Kita akan membuat bagan tambahan lagi, namun kali ini kita akan menghapus legenda, menambahkan beberapa label bagan, dan menggunakan tema yang ditentukan dalam kode di atas:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>ggplot(data, aes(x = as.factor(day), y = rank, group = team)) +\n  geom_line(aes(color = team, alpha = 1), size = 2) +\n  geom_point(aes(color = team, alpha = 1), size = 4) +\n  geom_point(color = \"#FFFFFF\", size = 1) +\n  scale_y_reverse(breaks = 1:nrow(data)) + \n  scale_x_discrete(breaks = 1:10) +\n  theme(legend.position = 'none') +\n  geom_text(data = data %&gt;% filter(day == \"1\"),\n            aes(label = team, x = 0.5), hjust = .5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  geom_text(data = data %&gt;% filter(day == \"10\"),\n            aes(label = team, x = 10.5), hjust = 0.5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  labs(x = 'Day', y = 'Rank', title = 'Team Ranking by Day') +\n  my_theme()<\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Kita juga dapat dengan mudah menyorot salah satu baris dengan menambahkan argumen <strong>scale_color_manual()<\/strong> . Misalnya, dalam kode berikut, kita membuat garis Tim A menjadi ungu dan semua garis lainnya menjadi abu-abu:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>ggplot(data, aes(x = as.factor(day), y = rank, group = team)) +\n  geom_line(aes(color = team, alpha = 1), size = 2) +\n  geom_point(aes(color = team, alpha = 1), size = 4) +\n  geom_point(color = \"#FFFFFF\", size = 1) +\n  scale_y_reverse(breaks = 1:nrow(data)) + \n  scale_x_discrete(breaks = 1:10) +\n  theme(legend.position = 'none') +\n  geom_text(data = data %&gt;% filter(day == \"1\"),\n            aes(label = team, x = 0.5), hjust = .5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  geom_text(data = data %&gt;% filter(day == \"10\"),\n            aes(label = team, x = 10.5), hjust = 0.5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  labs(x = 'Day', y = 'Rank', title = 'Team Ranking by Day') +\n  my_theme() <span style=\"color: #800080;\">+\n  scale_color_manual(values = c('purple', 'grey', 'grey', 'grey', 'grey'))<\/span><\/strong><\/pre>\n<p> <span style=\"color: #000000;\">Kita juga dapat menyorot beberapa baris jika kita ingin:<\/span><\/p>\n<pre style=\"background-color: #e5e5e5; font-size: 15px;\"> <strong>ggplot(data, aes(x = as.factor(day), y = rank, group = team)) +\n  geom_line(aes(color = team, alpha = 1), size = 2) +\n  geom_point(aes(color = team, alpha = 1), size = 4) +\n  geom_point(color = \"#FFFFFF\", size = 1) +\n  scale_y_reverse(breaks = 1:nrow(data)) + \n  scale_x_discrete(breaks = 1:10) +\n  theme(legend.position = 'none') +\n  geom_text(data = data %&gt;% filter(day == \"1\"),\n            aes(label = team, x = 0.5), hjust = .5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  geom_text(data = data %&gt;% filter(day == \"10\"),\n            aes(label = team, x = 10.5), hjust = 0.5,\n            fontface = \"bold\", color = \"#888888\", size = 4) +\n  labs(x = 'Day', y = 'Rank', title = 'Team Ranking by Day') +\n  my_theme() <span style=\"color: #800080;\">+\n  scale_color_manual(values = c('purple', 'steelblue', 'grey', 'grey', 'grey'))<\/span><\/strong><\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Bagan tambahan adalah jenis bagan yang menunjukkan peringkat kelompok yang berbeda dari waktu ke waktu, bukan nilai absolut, untuk menekankan urutan kelompok, bukan jumlah perubahannya. Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2. Contoh: membuat grafik relief Untuk membuat diagram bump di R, pertama-tama kita perlu memuat dua paket: dplyr dan [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v21.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-29T19:13:06+00:00\" \/>\n<meta name=\"author\" content=\"Benjamin anderson\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Ditulis oleh\" \/>\n\t<meta name=\"twitter:data1\" content=\"Benjamin anderson\" \/>\n\t<meta name=\"twitter:label2\" content=\"Estimasi waktu membaca\" \/>\n\t<meta name=\"twitter:data2\" content=\"4 menit\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/\",\"url\":\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/\",\"name\":\"Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-29T19:13:06+00:00\",\"dateModified\":\"2023-07-29T19:13:06+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Cara mudah membuat plot relief di r menggunakan ggplot2\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/id\/#website\",\"url\":\"https:\/\/statorials.org\/id\/\",\"name\":\"Statorials\",\"description\":\"Panduan anda untuk kompetensi statistik!\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/id\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"id\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\",\"name\":\"Benjamin anderson\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"id\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/\",\"url\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"Benjamin anderson\"},\"description\":\"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya\",\"sameAs\":[\"http:\/\/statorials.org\/id\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials","description":"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/","og_locale":"id_ID","og_type":"article","og_title":"Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials","og_description":"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.","og_url":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/","og_site_name":"Statorials","article_published_time":"2023-07-29T19:13:06+00:00","author":"Benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Ditulis oleh":"Benjamin anderson","Estimasi waktu membaca":"4 menit"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/","url":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/","name":"Cara Mudah Membuat Bump Chart di R Menggunakan ggplot2 - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-29T19:13:06+00:00","dateModified":"2023-07-29T19:13:06+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara mudah membuat bump plot di R menggunakan ggplot2.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/plot-benjolan-di-r-menggunakan-ggplot2\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Cara mudah membuat plot relief di r menggunakan ggplot2"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/id\/#website","url":"https:\/\/statorials.org\/id\/","name":"Statorials","description":"Panduan anda untuk kompetensi statistik!","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/id\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"id"},{"@type":"Person","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81","name":"Benjamin anderson","image":{"@type":"ImageObject","inLanguage":"id","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/","url":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"Benjamin anderson"},"description":"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya","sameAs":["http:\/\/statorials.org\/id"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/475"}],"collection":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/comments?post=475"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/475\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=475"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=475"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=475"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}