- 博客(3)
- 收藏
- 关注
原创 一道和nycflights13相关的例题
首先,参照 planes 数据,保留 flights 数据中生产年份在 1990 年及之后的飞机所对应。接着,针对每一个起飞机场,计算他们每一周周六的平均起飞延误,比较是否高于该周的其。利用 flights 与 planes 中的数据回答下列问题。其次,计算出每一行数据的时间所对应的星期几以及一年中的第几周。filter(week_day == "星期六") %>%有传言称,机场周六的工作效率较低,我们希望对该问题展开讨论。的数据,因为过于老旧的飞机可能需要额外的保养等。
2023-06-08 21:45:18
203
1
原创 有关于字符型向量的函数编写
result <- numeric(length(pattern)) # 创建一个与 pattern 长度相等的数值型向量,用于保存结果 for (i in seq_along(pattern)) {例如,若 target = c(“abaa”, “abab”, “aacc”), pattern = c(“a”, “c”)。编写一个名为 Overlapping_search 的函数,其输入的参数为两个字符型向量,target。则该函数将检测 target 向量中”aa”和”cc”的出现的次数。
2023-06-08 21:42:04
89
1
原创 stringr:: colors()一道例题
运行下列代码,基于 stringr:: colors() 生成了字符串 color_string。筛选出 color_string 中所有不包含数字且不以字母 “s”开头的颜色,保存为新的。对新生成的 color_string 按照字母顺序排序,前三种颜色分别是什么。有多少种满足条件的颜色?
2023-06-08 21:37:09
81
1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人
RSS订阅