- 博客(5)
- 收藏
- 关注
RSS订阅原创 滞后函数R
#创立一个滞后函数L_L_<-function(x,lag=1,na.is=T){ if(na.is)c(rep(NA,lag),x[1:(length(x)-lag)]) else x[1:(lenth(x)~lag)]}save.image("滞后函数L_1")load("滞后函数L_1")
2021-06-16 22:07:32
573
原创 R语言学习笔记初级阶段
#向量的运算x<-seq(1,100,length.out = 10)x# %%求余的运算 %/%整除的运算#向量的运算中一个向量中所包含的元素必须是另一个向量的整数倍c(1,2,3,4)%in%c(1,2,3,5,6,8,7)ceiling(c(-2.3,3.14)) #返回不小于x的最大整数floor(c(-2.3,3.14))#返回不大于x的最大整数trunc(C(-2.3,3.14))#返回整数部分round(c(-2.3,3.14))#四舍五入取整数round(c(..
2021-06-16 22:06:18
354
原创 R语言实战笔记后续修改
#2021/6/7 R语言复习检索#数组 package23myarry<-array(vector,dimensions,dimnames)#列如z<-array(1:24,c(2,3,4),dimnames = list(dim1,dim2,dim30))#中间的dimension中的2表示行数，3表示列数，4表示数组中矩阵的个数#数据框 package24#table表示连列表patientid<-c(1,2,3,4)admdata<-c("10/15/2..
2021-06-16 22:04:53
458
原创 R语言实战学习笔记
setwd("C:/Users/wusuqi/Desktop/RData")options()options(digits = 3)x<-runif(50)summary(x)hist(x)q()mymatrix<-matrix(1:25,nrow=5,ncol = 5,byrow = T,dimnames = list(c(1,2,3,4,5),c(7,8,9,10,6)))mymatrixmymatrix<-matrix(1:24,nrow=,ncol = 6,by.
2021-06-16 22:02:38
396
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人