摘要：
sinEagle 阅读全文
摘要：
library(tidyverse) install.packages("nycflights13") library(nycflights13) library(lubridate) dailyFlight <- flights %>% mutate(date = make_date(year, 阅读全文
摘要：
install.packages('nycflights13') library(dplyr) library(utils) library(nycflights13) head(flights) flights_Month1_Day1 <- filter(flights, month == 1, 阅读全文
摘要：
d <- sample(1:10, 7) d sort(d, decreasing = TRUE) tmpIndex <- order(d) d[tmpIndex] tmpIndex <- order(airquality$Wind) tmpIndex scoreSheet1 <- data.fra 阅读全文
摘要：
stata <- data.frame(state.name, state.abb, state.area) stata volcano heatmap(volcano) Titanic cars women car data(Chile, package = "car") x <- c(1, 2, 阅读全文
摘要：
set.seed(125) myMat <- matrix(rpois(20, 3), nrow = 4) myMat dim(myMat) apply(myMat, 2, max) apply(myMat, 1, min) apply(myMat, 2, range) airquality spl 阅读全文
摘要：
library(ggplot2) library(tidyverse) mtcars dim(mtcars) head(mtcars) ?qplot qplot(data = mtcars, x = wt, y = mpg) + ggtitle(" sjdklfd skdjskfl dsfs") + 阅读全文
摘要：
1318: [蓝桥杯2017初赛]跳蚱蜢 时间限制: 1 Sec 内存限制: 256 MB提交: 721 解决: 240[状态] [提交] [命题人:外部导入] 题目描述 如图所示： 有9只盘子，排成1个圆圈。其中8只盘子内装着8只蚱蜢，有一个是空盘。我们把这些蚱蜢顺时针编号为 1~8。每只蚱蜢都可 阅读全文
摘要：
x <- rnorm(100) x hist(x, col = "lightblue") qqnorm(x) airquality ?airquality dim(airquality) head(airquality) plot(airquality$Wind, airquality$Ozone) 阅读全文
摘要：
题目描述 给出 1,2,\ldots,n1,2,…,n 的两个排列 P_1P1 和 P_2P2 ，求它们的最长公共子序列。 输入格式 第一行是一个数 nn。 接下来两行，每行为 nn 个数，为自然数 1,2,\ldots,n1,2,…,n 的一个排列。 输出格式 一个数，即最长公共子序列的长度。 阅读全文