【建站服务】【吉安网站建设|吉安网站制作|吉安网站设计】网站开发-网站改版-网站维护-网站搭建-网站托管-网站费用-网站价格-网站多少钱-网站报价-域名申请

当前位置：首页» 行业网站案例 » 【建站服务】【吉安网站建设|吉安网站制作|吉安网站设计】网站开发-网站改版-网站维护-网站搭建-网站托管-网站费用-网站价格-网站多少钱-网站报价-域名申请

作者: 风兰 . 阅读量： 7 . 发表时间：2022-09-20 19:37:54

网站建设

上往建站提供服务器空间服务商，百度快照排名，网站托管，百度推广运营,致力于设计外包服务与源代码定制开发，360推广，搜狗推广,增加网站的能见度及访问量提升网络营销的效果,主营：网站公司,百度推广公司电话,官网搭建服务,网站服务企业排名,服务器空间,英文域名等业务，专业团队服务，效果好。

【吉安网站建设|吉安网站制作|吉安网站设计】网站开发-网站改版-网站维护-网站搭建-网站托管-网站费用-网站价格-网站多少钱-网站报价

网站建设.png

吉安，是江西省地级市。古称庐陵、吉州；元初，取“吉泰民安”之意改称“吉安”。境内有佛教圣地——青原山，产生了禅宗青原派，吉安因此名扬海内外。吉安位于江西省中部，赣江中游，西接湖南省，南揽罗霄山脉中段，据富饶的吉泰平原，是江西建制最早的古郡之一，是赣文化发源地之一。吉安下辖2区1市10县。全市总面积25283平方千米 [48] 。 [1-4] 截至2020年11月1日零时，吉安市常住人口为4469176人(第七次人口普查)。 [46]

吉安是赣文化三大支柱之一，自古乃人文渊源之地，孕育了自成一系的江右庐陵文化，素有“金庐陵”、“江南望郡”、“山水福地”、“文章节义之邦”、“状元之乡”、“才子之乡”、“庐陵风光半姑苏”、“将军市”、“红色摇篮”、“革命圣地”的美誉。 [5] 吉安有革命摇篮井冈山、武功山、羊狮慕、白鹭洲书院、吉州窑、庐陵文化生态园、文天祥纪念馆、渼陂古村、陂下古村、燕坊古村、快阁、槎滩陂等著名景区景点。先后获中国优秀旅游城市、全国双拥模范城市、国家森林城市、国家园林城市、全国绿化模范城市、全国电子信息产业科技兴贸创新城市、全国新型工业化（电子信息）产业示范基地城市、外商投资最佳城市、全国文明城市、国家卫生城市、省级文明城市、省级卫生城市、江西省首届生态宜居城市等荣誉称号。 [2] 吉安也是长江中游城市群重要成员。2017年11月，获第五届全国文明城市。 [6] 2018年10月，吉安获评健康中国年度标志城市。 [7]

2020年，吉安市实现地区生产总值2168.83亿元，增长4%。

如果不设置 encoding 属性，read.csv 函数将默认以操作系统默认的文字编码进行读取，如果你使用的是 Windows 中文版系统且没有设置过系统的默认编码，那系统的默认编码应该是 GBK。所以大家请尽可能地统一文字编码以防出错。

执行以上代码输出结果为：

  id   name            url likes1  1 Google www.google.com   1112  2 Runoob www.runoob.com   2223  3 Taobao www.taobao.com   333

read.csv() 函数返回的是数据框，我们可以很方便的对数据进行统计处理，以下实例我们查看行数和列数：

实例

data <- read.csv("sites.csv", encoding="UTF-8")

print(is.data.frame(data))  # 查看是否是数据框
print(ncol(data))  # 列数
print(nrow(data))  # 行数

执行以上代码输出结果为：

[1] TRUE[1] 4[1] 3

以下统计数据框中 likes 字段最大对数据：

实例

data <- read.csv("sites.csv", encoding="UTF-8")

# likes 最大的数据
like <- max(data$likes)
print(like)

执行以上代码输出结果为：

[1] 333

我们也可以指定查找条件，类似 SQL where 子句一样查询数据，需要用到到函数是 subset()。

以下实例查找 likes 为 222 到数据：

实例

data <- read.csv("sites.csv", encoding="UTF-8")

# likes 为 222 的数据
retval <- subset(data, likes == 222)
print(retval)

执行以上代码输出结果为：

  id   name            url likes2  2 Runoob www.runoob.com   222

注意：条件语句等于使用 ==。

多个条件使用 & 分隔符，以下实例查找 likes 大于 1 name 为 Runoob 的数据：

实例

data <- read.csv("sites.csv", encoding="UTF-8")

# likes 大于 1 name 为 Runoob 的数据
retval <- subset(data, likes > 1 & name=="Runoob")
print(retval)

执行以上代码输出结果为：

  id   name            url likes2  2 Runoob www.runoob.com   222

保存为 CSV 文件

R 语言可以使用 write.csv() 函数将数据保存为 CSV 文件。

接着以上实例，我们将 likes 为 222 的数据保存到 runoob.csv 文件：

实例

data <- read.csv("sites.csv", encoding="UTF-8")

# likes 为 222 的数据
retval <- subset(data, likes == 222)

# 写入新的文件
write.csv(retval,"runoob.csv")
newdata <- read.csv("runoob.csv")
print(newdata)