上往建站提供服务器空间服务商,百度快照排名,网站托管,百度推广运营,致力于设计外包服务与源代码定制开发,360推广,搜狗推广,增加网站的能见度及访问量提升网络营销的效果,主营:网站公司,百度推广公司电话,官网搭建服务,网站服务企业排名,服务器空间,英文域名等业务,专业团队服务,效果好。
江西省萍乡网站建设公司-萍乡专业网页设计公司-萍乡高端网站制作-萍乡品牌网站设计-萍乡页面美工-萍乡上档次网站建设-萍乡定制个性化网站开发-萍乡一站式一条龙网站搭建开发-萍乡一站式一条龙网站搭建

全市土地面积5746508亩,总面积3831平方公里。现辖芦溪、上栗、莲花三县和安源、湘东两区及国家级经济开发区萍乡经济技术开发区;有28个镇、19个乡、7个街道办事处、136个居民委员会和640个村民委员会。其中,芦溪县土地总面积1441761亩,总面积961平方公里,有5个镇、5个乡、15个居民委员会、139个村民委员会;上栗县土地总面积1091010亩,总面积727平方公里,有6个镇、4个乡、11个居民委员会、163个村民委员会;莲花县土地面积1608012亩,总面积1072平方公里,有5个镇、8个乡、5个居民委员会、157个村民委员会;安源区土地面积319045亩,总面积213平方公里,有4个镇、6个街道办事处、76个居民委员会、54个村民委员会;湘东区土地面积1286680亩,总面积858平方公里,有8个镇、2个乡、1个街
道办事处、29个居民委员会和127个村民委员会(其中国家级经济技术开发区土地面积包括在安源区和上栗县中)。 [50] 市人民政府驻安源区白源街道玉湖东路,距省会南昌市2
18千米 [49] 。
地理环境
编辑 播报位置境域
萍乡市位于江西省西部,省会南昌市的正西方。东与宜春市、南与吉安市、西与湖南省株洲市、北与湖南省浏阳市接壤,地处北纬26°57′~28°01′,东经113°35’~114°17′之间,市境南北最长127公里,东西最宽67公里,境域国土面积3831
平方千米 [49] 为了更好地表达信息,我们可以在图表上添加标题、颜色及每个矩形条的名称。
以下我们创建 2020 年 7 月 1 日中国、美国和印度的新冠疫情确诊人数统计图。
中文字体需要设置字体参数 family='GB1':
实例
cvd19 = c(83534,2640626,585493)
barplot(cvd19,
main="新冠疫情条形图",
col=c("#ED1C24","#22B14C","#FFC90E"),
names.arg=c("中国","美国","印度"),
family='GB1'
)

barplot 中的数据既可以是向量,也可以是矩阵,现在我们生成一张新冠疫情 6 月和 7 月对比图。
首先准备数据:
| | 中国 | 美国 | 印度 |
|---|
| 6 月 | 83017 | 1794546 | 190535 |
| 7 月 | 83534 | 2640626 | 585493 |
转换成矩阵,生成条形图,按并排格式显示,而且要显示颜色样本。
这里我们设置了自己的字体库,详细内容可以参考 R 绘图 - 中文支持
实例
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
c(83017, 83534, 1794546, 2640626, 190535, 585493),
2, 3
)
# 设置文件名,输出为 png
png(file = "runoob-bar-1.png")
#加载字体
showtext_begin();
colnames(cvd19) = c("中国", "美国", "印度")
rownames(cvd19) = c("6月", "7月")
barplot(cvd19, main = "新冠疫情条形图", beside=TRUE, legend=TRUE, family='SyHei')
# 去掉字体
showtext_end();
以下代码会在当前程序目录下生存一个 runoob-bar-1.png 文件,如下所示:

我们设置的颜色样本将是每各组的颜色样本:
实例
library(plotrix)
library(showtext);
font_add("SyHei", "SourceHanSansSC-Bold.otf");
cvd19 = matrix(
c(83017, 83534, 1794546, 2640626, 190535, 585493),
2, 3
)
# 设置文件名,输出为 png
png(file = "runoob-bar-2.png")
#加载字体
showtext_begin();
colnames(cvd19) = c("中国", "美国", "印度")
rownames(cvd19) = c("6月", "7月")
barplot(cvd19, main = "新冠疫情条形图", beside=TRUE, legend=TRUE,col=c("blue","green"), family='SyHei')
# 去掉字体
showtext_end();
江西省萍乡网站建设公司-萍乡专业网页设计公司-萍乡高端网站制作-萍乡品牌网站设计-萍乡页面美工-萍乡上档次网站建设-萍乡定制个性化网站开发-萍乡一站式一条龙网站搭建开发-萍乡一站式一条龙网站搭建
上往建站提供搭建网站,域名注册,官网备案服务,网店详情页设计,企业网店,专业网络店铺管理运营全托管公司咨询电话,服务器空间,微信公众号托管,网页美工排版,致力于域名申请,竞价托管,软文推广,全网营销,提供标准级专业技术保障,了却后顾之忧,主营:虚拟主机,网站推广,百度竞价托管,网站建设,上网建站推广服务,网络公司有哪些等业务,专业团队服务,效果好。
服务热线:400-111-6878 手机微信同号:18118153152(各城市商务人员可上门服务)