{"id":468,"date":"2023-07-29T19:48:38","date_gmt":"2023-07-29T19:48:38","guid":{"rendered":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/"},"modified":"2023-07-29T19:48:38","modified_gmt":"2023-07-29T19:48:38","slug":"%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2","status":"publish","type":"post","link":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/","title":{"rendered":"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 r \u4e2d\u521b\u5efa\u7518\u7279\u56fe"},"content":{"rendered":"

<\/p>\n

\n

\u7518\u7279\u56fe<\/strong>\u662f\u4e00\u79cd\u663e\u793a\u5404\u79cd\u4e8b\u4ef6\u7684\u5f00\u59cb\u548c\u7ed3\u675f\u65f6\u95f4\u7684\u56fe\u8868\u3002<\/span><\/p>\n

\u672c\u6559\u7a0b\u4ecb\u7ecd\u5982\u4f55\u4f7f\u7528ggplot2<\/strong>\u5305\u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u3002<\/span><\/p>\n

\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe<\/strong><\/span><\/h2>\n

\u5047\u8bbe\u6211\u4eec\u6709\u4ee5\u4e0b\u6570\u636e\u96c6\uff0c\u663e\u793a\u5546\u5e97\u56db\u4e2a\u4e0d\u540c\u5de5\u4eba\u8f6e\u73ed\u7684\u5f00\u59cb\u548c\u7ed3\u675f\u65f6\u95f4\uff1a<\/span><\/p>\n

 #create data frame<\/span>\ndata <- data.frame(name = c('Bob', 'Greg', 'Mike', 'Andy'), \nstart = c(4, 7, 12, 16),\nend = c(12, 11, 8, 22),\nshift_type = c('early', 'mid_day', 'mid_day', 'late')\n)\ndata\n\n# name start end shift_type\n#1 Bob 4 12 early\n#2 Greg 7 11 mid_day\n#3 Mike 12 8 mid_day\n#4 Andy 16 22 late<\/strong><\/pre>\n
\u4e3a\u4e86\u4f7f\u7528 ggplot2 \u521b\u5efa\u7518\u7279\u56fe\u6765\u53ef\u89c6\u5316\u6bcf\u4e2a\u5de5\u4eba\u7684\u5f00\u59cb\u548c\u7ed3\u675f\u65f6\u95f4\uff0c\u6211\u4eec\u53ef\u4ee5\u4f7f\u7528\u4ee5\u4e0b\u4ee3\u7801\uff1a<\/span><\/p>\n
 #install (if not already installed) and load ggplot2<\/span>\nif(!require(ggplot2)){install.packages('ggplot2')}\n\n#create gantt chart that visualizes start and end time for each worker<\/span>\nggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +\n  geom_segment()\n<\/strong><\/pre>\n
\u8fd9\u4f1a\u751f\u6210\u4ee5\u4e0b\u7518\u7279\u56fe\uff1a<\/span><\/p>\n
\u901a\u8fc7\u5bf9\u5e03\u5c40\u8fdb\u884c\u4e00\u4e9b\u8c03\u6574\uff0c\u6211\u4eec\u53ef\u4ee5\u4f7f\u8fd9\u4e2a\u7518\u7279\u56fe\u770b\u8d77\u6765\u66f4\u597d\uff1a<\/span><\/p>\n
 ggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +<\/strong>\ntheme_bw()+ #use ggplot theme with black gridlines and white background<\/span><\/strong>\ngeom_segment(size=8) + #increase line width of segments in the chart<\/span><\/strong>\nlabs(title='Worker Schedule', x='Time', y='Worker Name')<\/strong><\/pre>\n
\u8fd9\u4f1a\u4ea7\u751f\u4ee5\u4e0b\u56fe\u8868\uff1a<\/span><\/p>\n
\u6b64\u5916\uff0c\u5982\u679c\u60a8\u60f3\u8bbe\u7f6e\u56fe\u8868\u4e2d\u4f7f\u7528\u7684\u786e\u5207\u989c\u8272\uff0c\u53ef\u4ee5\u4f7f\u7528\u4ee5\u4e0b\u4ee3\u7801\uff1a<\/span><\/p>\n
 ggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +\n  theme_bw()+ #use ggplot theme with black gridlines and white background<\/span>\n  geom_segment(size=8) + #increase line width of segments in the chart<\/span>\n  labs(title='Worker Schedule', x='Time', y='Worker Name') +\n  scale_color_manual(values = c('pink', 'purple', 'blue'))<\/strong><\/pre>\n
\u8fd9\u4f1a\u751f\u6210\u4ee5\u4e0b\u56fe\u8868\uff0c\u5176\u4e2d\u7c89\u8272\u3001\u7d2b\u8272\u548c\u84dd\u8272\u4ee3\u8868\u4e0d\u540c\u7684\u73ed\u6b21\u7c7b\u578b\uff1a<\/span><\/p>\n
\u4f7f\u7528\u81ea\u5b9a\u4e49\u4e3b\u9898<\/strong><\/span><\/h2>\n
\u6211\u4eec\u53ef\u4ee5\u8fdb\u4e00\u6b65\u4f7f\u7528ggthemes<\/strong><\/a>\u5e93\u4e2d\u7684\u81ea\u5b9a\u4e49\u4e3b\u9898\u3002<\/span><\/p>\n
\u4f8b\u5982\uff0c\u6211\u4eec\u53ef\u4ee5\u521b\u5efa\u4e00\u4e2a\u4f7f\u7528\u300a\u534e\u5c14\u8857\u65e5\u62a5\u300b\u4e3b\u9898\u7684\u7518\u7279\u56fe\uff1a<\/span><\/p>\n
 #load ggthemes<\/em> library<\/span>\nlibrary(ggthemes)\n\n#create scatterplot with Wall Street Journal theme\n<\/span>ggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +\n  theme_bw()+\n  geom_segment(size=8) +\n  labs(title='Worker Schedule', x='Time', y='Worker Name') +\n  scale_color_manual(values = c('pink', 'purple', 'blue')) +\n  theme_wsj() + \n  theme(axis.title = element_text())<\/span><\/strong><\/pre>\n
\u6216\u8005\u6211\u4eec\u53ef\u4ee5\u4f7f\u7528\u53d7\u300a\u7ecf\u6d4e\u5b66\u4eba\u300b\u542f\u53d1\u7684\u4e3b\u9898\uff1a<\/span><\/p>\n
 ggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +\n  theme_bw()+\n  geom_segment(size=8) +\n  labs(title='Worker Schedule', x='Time', y='Worker Name') +\n  scale_color_manual(values = c('pink', 'purple', 'blue')) +\n  theme_economist() + \n  theme(axis.title = element_text())<\/span><\/strong><\/pre>\n
\u6216\u8005\u4e5f\u8bb8\u662f\u4e94\u70b9\u4e09\u5341\u516b\u5206<\/a>\u7684\u7075\u611f\u4e3b\u9898\uff1a<\/span><\/p>\n
 ggplot(data, aes(x=start, xend=end, y=name, yend=name, color=shift_type)) +\n  theme_bw()+\n  geom_segment(size=8) +\n  labs(title='Worker Schedule', x='Time', y='Worker Name') +\n  scale_color_manual(values = c('pink', 'purple', 'blue')) +\n  theme_fivethirtyeight() + \n  theme(axis.title = element_text())<\/span><\/strong><\/pre>\n
\u6709\u5173ggthemes<\/em>\u5e93\u4e2d\u53ef\u7528\u4e3b\u9898\u7684\u5b8c\u6574\u5217\u8868\uff0c\u8bf7\u53c2\u9605\u6587\u6863\u9875\u9762<\/a>\u3002<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"
\u7518\u7279\u56fe\u662f\u4e00\u79cd\u663e\u793a\u5404\u79cd\u4e8b\u4ef6\u7684\u5f00\u59cb\u548c\u7ed3\u675f\u65f6\u95f4\u7684\u56fe\u8868\u3002 \u672c\u6559\u7a0b\u4ecb\u7ecd\u5982\u4f55\u4f7f\u7528ggplot2\u5305\u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u3002 \u4f7f […]<\/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":[],"class_list":["post-468","post","type-post","status-publish","format-standard","hentry","category-11"],"yoast_head":"\n\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials<\/title>\n<meta name=\"description\" content=\"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002\" \/>\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\/cn\/\u7518\u7279\u56fe-r-ggplot2\/\" \/>\n<meta property=\"og:locale\" content=\"zh_CN\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials\" \/>\n<meta property=\"og:description\" content=\"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/cn\/\u7518\u7279\u56fe-r-ggplot2\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-29T19:48:38+00:00\" \/>\n<meta name=\"author\" content=\"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"\u4f5c\u8005\" \/>\n\t<meta name=\"twitter:data1\" content=\"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a\" \/>\n\t<meta name=\"twitter:label2\" content=\"\u9884\u8ba1\u9605\u8bfb\u65f6\u95f4\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 \u5206\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/\",\"url\":\"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/\",\"name\":\"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/cn\/#website\"},\"datePublished\":\"2023-07-29T19:48:38+00:00\",\"dateModified\":\"2023-07-29T19:48:38+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/cn\/#\/schema\/person\/124e4e5b7c9f8dc0f1f95cc8c1db3261\"},\"description\":\"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/#breadcrumb\"},\"inLanguage\":\"zh-Hans\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u5bb6\",\"item\":\"https:\/\/statorials.org\/cn\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 r \u4e2d\u521b\u5efa\u7518\u7279\u56fe\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/cn\/#website\",\"url\":\"https:\/\/statorials.org\/cn\/\",\"name\":\"Statorials\",\"description\":\"\u60a8\u7684\u7edf\u8ba1\u7d20\u517b\u6307\u5357\uff01\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/cn\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"zh-Hans\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/cn\/#\/schema\/person\/124e4e5b7c9f8dc0f1f95cc8c1db3261\",\"name\":\"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"zh-Hans\",\"@id\":\"https:\/\/statorials.org\/cn\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/statorials.org\/cn\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"https:\/\/statorials.org\/cn\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a\"},\"description\":\"\u5927\u5bb6\u597d\uff0c\u6211\u662f\u672c\u6770\u660e\uff0c\u4e00\u4f4d\u9000\u4f11\u7684\u7edf\u8ba1\u5b66\u6559\u6388\uff0c\u540e\u6765\u6210\u4e3a Statorials \u7684\u70ed\u5fc3\u6559\u5e08\u3002 \u51ed\u501f\u5728\u7edf\u8ba1\u9886\u57df\u7684\u4e30\u5bcc\u7ecf\u9a8c\u548c\u4e13\u4e1a\u77e5\u8bc6\uff0c\u6211\u6e34\u671b\u5206\u4eab\u6211\u7684\u77e5\u8bc6\uff0c\u901a\u8fc7 Statorials \u589e\u5f3a\u5b66\u751f\u7684\u80fd\u529b\u3002\u4e86\u89e3\u66f4\u591a\",\"sameAs\":[\"https:\/\/statorials.org\/cn\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials","description":"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002","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\/cn\/\u7518\u7279\u56fe-r-ggplot2\/","og_locale":"zh_CN","og_type":"article","og_title":"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials","og_description":"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002","og_url":"https:\/\/statorials.org\/cn\/\u7518\u7279\u56fe-r-ggplot2\/","og_site_name":"Statorials","article_published_time":"2023-07-29T19:48:38+00:00","author":"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a","twitter_card":"summary_large_image","twitter_misc":{"\u4f5c\u8005":"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a","\u9884\u8ba1\u9605\u8bfb\u65f6\u95f4":"2 \u5206"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/","url":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/","name":"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/cn\/#website"},"datePublished":"2023-07-29T19:48:38+00:00","dateModified":"2023-07-29T19:48:38+00:00","author":{"@id":"https:\/\/statorials.org\/cn\/#\/schema\/person\/124e4e5b7c9f8dc0f1f95cc8c1db3261"},"description":"\u6709\u5173\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 R \u4e2d\u521b\u5efa\u7518\u7279\u56fe\u7684\u7b80\u5355\u6559\u7a0b\u3002","breadcrumb":{"@id":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/#breadcrumb"},"inLanguage":"zh-Hans","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/cn\/%e7%94%98%e7%89%b9%e5%9b%be-r-ggplot2\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u5bb6","item":"https:\/\/statorials.org\/cn\/"},{"@type":"ListItem","position":2,"name":"\u5982\u4f55\u4f7f\u7528 ggplot2 \u5728 r \u4e2d\u521b\u5efa\u7518\u7279\u56fe"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/cn\/#website","url":"https:\/\/statorials.org\/cn\/","name":"Statorials","description":"\u60a8\u7684\u7edf\u8ba1\u7d20\u517b\u6307\u5357\uff01","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/cn\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"zh-Hans"},{"@type":"Person","@id":"https:\/\/statorials.org\/cn\/#\/schema\/person\/124e4e5b7c9f8dc0f1f95cc8c1db3261","name":"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a","image":{"@type":"ImageObject","inLanguage":"zh-Hans","@id":"https:\/\/statorials.org\/cn\/#\/schema\/person\/image\/","url":"https:\/\/statorials.org\/cn\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"https:\/\/statorials.org\/cn\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"\u672c\u6770\u660e\u00b7\u5b89\u5fb7\u68ee\u535a"},"description":"\u5927\u5bb6\u597d\uff0c\u6211\u662f\u672c\u6770\u660e\uff0c\u4e00\u4f4d\u9000\u4f11\u7684\u7edf\u8ba1\u5b66\u6559\u6388\uff0c\u540e\u6765\u6210\u4e3a Statorials \u7684\u70ed\u5fc3\u6559\u5e08\u3002 \u51ed\u501f\u5728\u7edf\u8ba1\u9886\u57df\u7684\u4e30\u5bcc\u7ecf\u9a8c\u548c\u4e13\u4e1a\u77e5\u8bc6\uff0c\u6211\u6e34\u671b\u5206\u4eab\u6211\u7684\u77e5\u8bc6\uff0c\u901a\u8fc7 Statorials \u589e\u5f3a\u5b66\u751f\u7684\u80fd\u529b\u3002\u4e86\u89e3\u66f4\u591a","sameAs":["https:\/\/statorials.org\/cn"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/posts\/468","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/comments?post=468"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/posts\/468\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/media?parent=468"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/categories?post=468"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/cn\/wp-json\/wp\/v2\/tags?post=468"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}