{"id":411,"date":"2023-03-28T14:25:50","date_gmt":"2023-03-28T14:25:50","guid":{"rendered":"https:\/\/yunshangtulv.com.cn\/?p=411"},"modified":"2023-03-28T14:25:50","modified_gmt":"2023-03-28T14:25:50","slug":"r%e8%af%ad%e8%a8%80%e5%9f%ba%e7%a1%80%e7%bb%98%e5%9b%be%ef%bc%9a%e7%9b%b4%e6%96%b9%e5%9b%be","status":"publish","type":"post","link":"https:\/\/yunshangtulv.com.cn\/?p=411","title":{"rendered":"R\u8bed\u8a00\u57fa\u7840\u7ed8\u56fe\uff1a\u76f4\u65b9\u56fe"},"content":{"rendered":"
\n
\n
\n
\n
\n
\n

\u5982\u4f55\u521b\u5efa\u548c\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\u3002\u8bf7\u6309\u7167\u4ee5\u4e0b\u6b65\u9aa4\u64cd\u4f5c\uff1a<\/p>\n

    \n
  1. \u5b89\u88c5\u548c\u52a0\u8f7d\u6240\u9700\u7684\u5305\uff1a \u8981\u521b\u5efa\u76f4\u65b9\u56fe\uff0c\u6211\u4eec\u9700\u8981\u4f7f\u7528ggplot2\u5305\u3002\u5982\u679c\u60a8\u5c1a\u672a\u5b89\u88c5\uff0c\u8bf7\u4f7f\u7528\u4ee5\u4e0b\u547d\u4ee4\u5b89\u88c5\uff1a<\/li>\n<\/ol>\n
    \n
    <\/div>\n
    install.packages(<\/span>\"ggplot2\"<\/span>)<\/span>
    \n<\/code><\/div>\n<\/div>\n

    \u7136\u540e\u5728\u811a\u672c\u4e2d\u52a0\u8f7d\u5305\uff1a<\/p>\n

    \n
    <\/div>\n
    library(<\/span>ggplot2)<\/span>
    \n<\/code><\/div>\n<\/div>\n
      \n
    1. \u52a0\u8f7d\u6570\u636e\uff1a \u5728\u8fd9\u91cc\uff0c\u6211\u4eec\u5c06\u4f7f\u7528R\u5185\u7f6e\u7684\u6570\u636e\u96c6\u201cmtcars\u201d\u3002\u8981\u52a0\u8f7d\u6b64\u6570\u636e\u96c6\uff0c\u8bf7\u8fd0\u884c\u4ee5\u4e0b\u547d\u4ee4\uff1a<\/li>\n<\/ol>\n
      \n
      <\/div>\n
      data(<\/span>mtcars)<\/span>
      \n<\/code><\/div>\n<\/div>\n
        \n
      1. \u521b\u5efa\u7b80\u5355\u7684\u76f4\u65b9\u56fe\uff1a \u73b0\u5728\uff0c\u6211\u4eec\u5c06\u4f7f\u7528ggplot2\u5305\u521b\u5efa\u4e00\u4e2a\u7b80\u5355\u7684\u76f4\u65b9\u56fe\u3002\u6211\u4eec\u5c06\u4f7f\u7528mtcars\u6570\u636e\u96c6\u4e2d\u7684\u201cmpg\u201d\uff08\u82f1\u91cc\u6bcf\u52a0\u4ed1\uff09\u5217\u6765\u7ed8\u5236\u76f4\u65b9\u56fe\uff1a<\/li>\n<\/ol>\n
        \n
        <\/div>\n
        basic_histogram <-<\/span> ggplot(<\/span>mtcars,<\/span> aes(<\/span>x=<\/span>mpg)<\/span>)<\/span> +<\/span> geom_histogram(<\/span>)<\/span>
        \nprint(<\/span>basic_histogram)<\/span>
        \n<\/code><\/div>\n<\/div>\n
          \n
        1. \u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\uff1a \u6211\u4eec\u53ef\u4ee5\u901a\u8fc7\u66f4\u6539bin\u5bbd\u5ea6\u3001\u989c\u8272\u548c\u586b\u5145\u6765\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\uff1a<\/li>\n<\/ol>\n
          \n
          <\/div>\n
          custom_histogram <-<\/span> ggplot(<\/span>mtcars,<\/span> aes(<\/span>x=<\/span>mpg)<\/span>)<\/span> +<\/span>
          \n geom_histogram(<\/span>binwidth=<\/span>2<\/span>,<\/span> color=<\/span>\"black\"<\/span>,<\/span> fill=<\/span>\"blue\"<\/span>)<\/span> +<\/span>
          \n labs(<\/span>title=<\/span>\"Miles Per Gallon Histogram\"<\/span>,<\/span>
          \n x=<\/span>\"Miles per Gallon\"<\/span>,<\/span>
          \n y=<\/span>\"Frequency\"<\/span>)<\/span>
          \nprint(<\/span>custom_histogram)<\/span>
          \n<\/code><\/div>\n<\/div>\n

          \u5728\u8fd9\u91cc\uff0c\u6211\u4eec\u66f4\u6539\u4e86bin\u5bbd\u5ea6\u4e3a2\uff0c\u8bbe\u7f6e\u4e86\u8fb9\u6846\u989c\u8272\u4e3a\u9ed1\u8272\uff0c\u586b\u5145\u989c\u8272\u4e3a\u84dd\u8272\u3002\u6211\u4eec\u8fd8\u6dfb\u52a0\u4e86\u6807\u9898\u548c\u8f74\u6807\u7b7e\u3002<\/p>\n

            \n
          1. \u66f4\u6539\u4e3b\u9898\uff1a \u6211\u4eec\u53ef\u4ee5\u4f7f\u7528\u4e0d\u540c\u7684\u9884\u8bbe\u4e3b\u9898\u6216\u521b\u5efa\u81ea\u5b9a\u4e49\u4e3b\u9898\u3002\u5728\u8fd9\u4e2a\u4f8b\u5b50\u4e2d\uff0c\u6211\u4eec\u5c06\u4f7f\u7528\u9884\u8bbe\u4e3b\u9898\u201ctheme_minimal()\u201d\uff1a<\/li>\n<\/ol>\n
            \n
            <\/div>\n
            themed_histogram <-<\/span> custom_histogram +<\/span> theme_minimal(<\/span>)<\/span>
            \nprint(<\/span>themed_histogram)<\/span>
            \n<\/code><\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n
            \n
            \n
            \n
            \n
            \n
            \n

            <\/p>\n

            \u5728\u8fd9\u4e2aR\u8bed\u8a00\u76f4\u65b9\u56fe\u6559\u7a0b\u4e2d\uff0c\u6211\u4eec\u5c06\u4f7f\u7528\u73b0\u5b9e\u751f\u6d3b\u4e2d\u7684\u4e00\u4e2a\u5e94\u7528\u5b9e\u4f8b\u6765\u521b\u5efa\u548c\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\u3002\u6211\u4eec\u5c06\u5206\u6790\u67d0\u516c\u53f8\u5458\u5de5\u7684\u5e74\u9f84\u5206\u5e03\u3002\u4ee5\u4e0b\u662f\u4e00\u4e2a\u5047\u8bbe\u7684\u5458\u5de5\u5e74\u9f84\u6570\u636e\u96c6\uff1a<\/p>\n

            \n
            <\/div>\n
            # \u5047\u8bbe\u7684\u5458\u5de5\u5e74\u9f84\u6570\u636e<\/span>
            \nemployee_age <-<\/span> c<\/span>(<\/span>22<\/span>,<\/span> 25<\/span>,<\/span> 28<\/span>,<\/span> 30<\/span>,<\/span> 32<\/span>,<\/span> 35<\/span>,<\/span> 40<\/span>,<\/span> 44<\/span>,<\/span> 48<\/span>,<\/span> 50<\/span>,<\/span> 52<\/span>,<\/span> 55<\/span>,<\/span> 58<\/span>,<\/span> 60<\/span>)<\/span>
            \n<\/code><\/div>\n<\/div>\n
              \n
            1. \u52a0\u8f7d\u5fc5\u8981\u7684\u5305\u548c\u6570\u636e\uff1a \u9996\u5148\uff0c\u6211\u4eec\u9700\u8981\u5b89\u88c5\u5e76\u52a0\u8f7dggplot2\u5305\uff08\u5982\u679c\u5c1a\u672a\u5b89\u88c5\uff09\uff0c\u5e76\u51c6\u5907\u6570\u636e\u96c6\uff1a<\/li>\n<\/ol>\n
              \n
              <\/div>\n
              # \u5b89\u88c5\u5e76\u52a0\u8f7dggplot2\u5305<\/span>
              \ninstall.packages(<\/span>\"ggplot2\"<\/span>)<\/span>
              \nlibrary(<\/span>ggplot2)<\/span><\/p>\n

              # \u5047\u8bbe\u7684\u5458\u5de5\u5e74\u9f84\u6570\u636e<\/span>
              \nemployee_age <-<\/span> c<\/span>(<\/span>22<\/span>,<\/span> 25<\/span>,<\/span> 28<\/span>,<\/span> 30<\/span>,<\/span> 32<\/span>,<\/span> 35<\/span>,<\/span> 40<\/span>,<\/span> 44<\/span>,<\/span> 48<\/span>,<\/span> 50<\/span>,<\/span> 52<\/span>,<\/span> 55<\/span>,<\/span> 58<\/span>,<\/span> 60<\/span>)<\/span>
              \n<\/code><\/div>\n<\/div>\n

                \n
              1. \u521b\u5efa\u76f4\u65b9\u56fe\uff1a \u6211\u4eec\u5c06\u4f7f\u7528ggplot2\u5305\u521b\u5efa\u5458\u5de5\u5e74\u9f84\u5206\u5e03\u7684\u76f4\u65b9\u56fe\uff1a<\/li>\n<\/ol>\n
                \n
                <\/div>\n
                age_histogram <-<\/span> ggplot(<\/span>data.frame(<\/span>Age=<\/span>employee_age)<\/span>,<\/span> aes(<\/span>x=<\/span>Age)<\/span>)<\/span> +<\/span> geom_histogram(<\/span>binwidth=<\/span>5<\/span>)<\/span>
                \nprint(<\/span>age_histogram)<\/span>
                \n<\/code><\/div>\n<\/div>\n

                \u8fd9\u91cc\u6211\u4eec\u8bbe\u7f6e\u4e86bin\u5bbd\u5ea6\u4e3a5\uff0c\u5c06\u5e74\u9f84\u5206\u4e3a5\u5c81\u7684\u533a\u95f4\u3002<\/p>\n

                  \n
                1. \u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\uff1a \u6211\u4eec\u53ef\u4ee5\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\u7684\u989c\u8272\u3001\u6807\u9898\u548c\u8f74\u6807\u7b7e\uff1a<\/li>\n<\/ol>\n
                  \n
                  <\/div>\n
                  custom_age_histogram <-<\/span> age_histogram +<\/span>
                  \n geom_histogram(<\/span>binwidth=<\/span>5<\/span>,<\/span> color=<\/span>\"black\"<\/span>,<\/span> fill=<\/span>\"lightblue\"<\/span>)<\/span> +<\/span>
                  \n labs(<\/span>title=<\/span>\"Employee Age Distribution\"<\/span>,<\/span>
                  \n x=<\/span>\"Age\"<\/span>,<\/span>
                  \n y=<\/span>\"Frequency\"<\/span>)<\/span>
                  \nprint(<\/span>custom_age_histogram)<\/span>
                  \n<\/code><\/div>\n<\/div>\n
                    \n
                  1. \u5e94\u7528\u4e3b\u9898\uff1a \u6211\u4eec\u53ef\u4ee5\u5e94\u7528\u4e00\u4e2a\u9884\u8bbe\u4e3b\u9898\uff0c\u4f8b\u5982\u201ctheme_minimal()\u201d\uff1a<\/li>\n<\/ol>\n
                    \n
                    <\/div>\n
                    themed_age_histogram <-<\/span> custom_age_histogram +<\/span> theme_minimal(<\/span>)<\/span>
                    \nprint(<\/span>themed_age_histogram)<\/span>
                    \n<\/code><\/div>\n<\/div>\n

                    <\/p>\n

                    \u8fd9\u4e2a\u4f8b\u5b50\u5c55\u793a\u4e86\u5982\u4f55\u4f7f\u7528R\u8bed\u8a00\u548cggplot2\u5305\u5206\u6790\u73b0\u5b9e\u751f\u6d3b\u4e2d\u7684\u6570\u636e\u3002\u901a\u8fc7\u521b\u5efa\u548c\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\uff0c\u6211\u4eec\u53ef\u4ee5\u66f4\u597d\u5730\u4e86\u89e3\u5458\u5de5\u5e74\u9f84\u5206\u5e03\u60c5\u51b5\u3002<\/p>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

                    \u5982\u4f55\u521b\u5efa\u548c\u81ea\u5b9a\u4e49\u76f4\u65b9\u56fe\u3002\u8bf7\u6309\u7167\u4ee5\u4e0b\u6b65\u9aa4\u64cd\u4f5c\uff1a \u5b89\u88c5\u548c\u52a0\u8f7d\u6240\u9700\u7684\u5305\uff1a \u8981\u521b\u5efa\u76f4\u65b9\u56fe\uff0c\u6211\u4eec\u9700\u8981\u4f7f\u7528ggplot2\u5305 […]<\/p>\n","protected":false},"author":111,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[9],"tags":[],"class_list":["post-411","post","type-post","status-publish","format-standard","hentry","category-r"],"_links":{"self":[{"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=\/wp\/v2\/posts\/411","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=\/wp\/v2\/users\/111"}],"replies":[{"embeddable":true,"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=411"}],"version-history":[{"count":0,"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=\/wp\/v2\/posts\/411\/revisions"}],"wp:attachment":[{"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=411"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=411"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/yunshangtulv.com.cn\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=411"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}