r语言作业:出租车数据基础数据分析、时间处理等

目录

一、数据框操作

1.读取线圈检测器数据样例:Detector_sample.csv, 输出总记录数

2.统计流量一列的缺失个数.

3.对包含缺失值的行进行剔除,输出剔除后记录数.

4.统计冗余记录数,如有需剔除. (参考函数:duplicated())

5.计算流量、速度、占有率的平均值、方差、25%、50%和75%分位数

二、日期时间处理

2.1 处理

6.对数据框按照时间列进行排序.

7.分别提取日期时间列的小时、分钟、秒,新增为DAY、MINUTE、SECOND列.

2.2 绘图

8.绘制流量、速度、占有率的直方图

9.绘制流量-速度散点图.


一、数据框操作

1.读取线圈检测器数据样例:Detector_sample.csv, 输出总记录数

代码:

data<-read.csv("F:\\data\\Detector_sample_update.csv")

View(data)

输出结果(篇幅所限,仅截图首尾,中间略):

2.统计流量一列的缺失个数.

代码:

table(is.na(data[3]))

输出结果:

即缺失个数为3

 

3.对包含缺失值的行进行剔除,输出剔除后记录数.

代码:

na_omit_data<-na.omit(data)

print(nrow(na_omit_data))

输出结果:

即剔除后记录数为4323

  • 2
    点赞
  • 81
    收藏
    觉得还不错? 一键收藏
  • 4
    评论
Cyclistic 是一家虚构的公司,提供自行车共享设施。该公司有两大类骑手:休闲骑手和年度会员。休闲骑手是使用单程通行证和全天通行证的人。年度会员有一年的通行证可以使用自行车。 描述性分析 我已经分别使用每个月的数据透视表进行了初步分析。 数据透视表 1:这描述了每个工作日的骑行次和平均骑行时长。 数据透视表 2:这分析了每种可骑行类型(即停放自行车、经典自行车和电动自行车)的骑行次和平均骑行长度。 数据透视表 3:它比较了每个成员类型(即休闲和年度)的乘车次和平均乘车时间数据透视表 4:这显示了整个月的平均和最大骑行长度。 数据透视表 5:该表记录了每个起点站的骑行次和平均骑行长度。 我已经整理了每个月的这些摘要,并放在一个电子表格中,以确定每月和季节性的分析。我发现的一些有趣的事实和趋势如下: 最长的骑行发生在 2021 年 6 月至 7 月,创下大约 38 天的记录! 一年中的几个月,即 5 月到 9 月,自行车骑行的次很高,7 月本身记录了 822k 的峰值。 11 月至 2 月见证了低乘车人。2 月创下了最低的降幅,仅有 5 万次骑行。 Streeter Dr & Grand Ave 是最受欢迎的起点站,一个月内乘坐次高达 15,000 次。 每月比较 其他一些重要的观察结果是: 经典自行车是最受欢迎的选择,每 3 次骑行中就有 2 次使用经典自行车。 停放自行车是骑行超过 1 小时的人的最爱。 休闲骑手的平均骑行长度高于年度会员。几乎是后者的两倍。 周六和周日的骑行次最多。这两天的平均骑行时间也创下了历史新高。 使用 SQL 进行年视图分析 我将使用 SQL 合并所有的月度数据来做一个整体的年度分析。我将使用 Microsoft SQL Server 来执行所有数据库操作。 所有分步查询都可以在这里找到bikesharecasestudy.sql。请务必查看bikeShareCaseStudyReport.docx以查看所有重要数据和输出。 该分析揭示了年度会员和休闲骑手之间的一些有趣趋势。以下是分析。 年末会员的乘车份额增加(超过 50%),加上临时会员的乘车份额下降。最大值记录在 1 月 (80%)。 休闲骑手的平均骑行时长是年度骑手的两倍多。 年度会员在一年内记录的乘车次多于休闲骑手。 周六的骑行次和平均骑行时长最高,其次是周六和周五。周末生意兴隆。 经典自行车是这两种骑手中最喜欢的类型。停靠自行车是最不受欢迎的。此外,休闲会员选择经典自行车进行长途骑行。 临时会员通常更喜欢周末而不是工作日。年度车手则相反,他们在所有日子里的人都很高,周日大幅下降。 使用 R 进行年视图分析 对于使用 R 的分析,我使用了 4 个季度的数据 - 2019 年的 Q2、Q3、Q4 和 2020 年的 Q1 。可以在此处找到用于清理、合并、分析和可视化的脚本R_script.R。 分享 此阶段是将要向利益相关者展示的重要和相关信息可视化。 年度会员和休闲骑手之间最显着的区别之一是他们在工作日的运营模式。 有报告

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 4
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值