在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
清屏命令ctrl+L 一、基础 1、产生数据结构 a、直接输入 b、冒号,1:10 c、seq函数 d、rep函数 > 1:10 [1] 1 2 3 4 5 6 7 8 9 10 > 10:2 [1] 10 9 8 7 6 5 4 3 2 > seq(1,10) [1] 1 2 3 4 5 6 7 8 9 10 > seq(1,10,2) [1] 1 3 5 7 9 > rep(2,4) [1] 2 2 2 2 > rep(1:3,times=3) [1] 1 2 3 1 2 3 1 2 3 > rep(x=1:3, each=3) [1] 1 1 1 2 2 2 3 3 3 > rep(1:3,1:3) [1] 1 2 2 3 3 3
2、数据产生 a、c()函数产生向量 b、matrix()函数产生矩阵 c、data.frame()函数产生数据框 d、factor()函数产生因子 e、list()函数产生列表 f、ts()函数产生时间序列 > x = c(3,4,6) > x [1] 3 4 6 > matrix(1:10,2) [,1] [,2] [,3] [,4] [,5] [1,] 1 3 5 7 9 [2,] 2 4 6 8 10 > matrix(1:10,nrow=2,ncol=5,byrow=T) [,1] [,2] [,3] [,4] [,5] [1,] 1 2 3 4 5 [2,] 6 7 8 9 10 > x = data.frame(1:5, 6:10) > x X1.5 X6.10 1 1 6 2 2 7 3 3 8 4 4 9 5 5 10 > x = cbind(x, c('a','b','c','d','e')) #绑上一列字符 > x X1.5 X6.10 c("a", "b", "c", "d", "e") 1 1 6 a 2 2 7 b 3 3 8 c 4 4 9 d 5 5 10 e > dimnames(x) #查看x的行列名 [[1]] [1] "1" "2" "3" "4" "5" [[2]] [1] "X1.5" "X6.10" [3] "c(\"a\", \"b\", \"c\", \"d\", \"e\")" > colnames(x) #只看列名 [1] "X1.5" "X6.10" [3] "c(\"a\", \"b\", \"c\", \"d\", \"e\")" > colnames(x) = c('X1','X2','X3') #改列名 > x X1 X2 X3 1 1 6 a 2 2 7 b 3 3 8 c 4 4 9 d 5 5 10 e
3、运算 %% 余数 %/% 整数商 ^ 乘方 & | ! 逻辑运算
4、下标的使用(获取元素) 用中括号[] > x = 1:10 > x [1] 1 2 3 4 5 6 7 8 9 10 > x[x>6] [1] 7 8 9 10 > x[x>6 & x<9] [1] 7 8 > x = matrix(1:20, 4) > x [,1] [,2] [,3] [,4] [,5] [1,] 1 5 9 13 17 [2,] 2 6 10 14 18 [3,] 3 7 11 15 19 [4,] 4 8 12 16 20 > x[x>2 & x<14] [1] 3 4 5 6 7 8 9 10 11 12 13 > x[x>2 & x<14] = NA > x [,1] [,2] [,3] [,4] [,5] [1,] 1 NA NA NA 17 [2,] 2 NA NA 14 18 [3,] NA NA NA 15 19 [4,] NA NA NA 16 20
二、一些数字和统计函数 1、 max() min() mean() 标准差sd() 方差var() 相关系数cor() 求和sum() 求积prod() 中位数median() 分位数quantile() 对数log() 指数exp() 排列factorial() 组合choose() 四舍五入round() 向下取整floor() 向上取整ceiling() 总结summary() 2、 累加cumsum() 秩rank() 排序sort() 倒序rev() 矩阵转置t() 逆矩阵solve() 特征根eigen()
三、流程控制 > x = 6 > while(x>1 & winDialog("yesno",message="you are sb")!='YES') + x = x-1
|
请发表评论