-
想你想你查看全部
-
date，time 日期與時(shí)間 --日期：Date ----距離 1970-01-01的天數(shù) /date()/Sys.Date() ----weekdays()/months()/quarters() 獲取系統(tǒng)日期 x2<-Sys.Date() 將字符串轉(zhuǎn)為日期 x3<-as.Date("2016-03-27")#格式為yyyy-mm-dd 獲取日期的星期幾，月份，季度 weekdays(x3) months(x3) quarters(x3) julian(x3)#距離 1970-01-01的天數(shù) x4<-as.Date("2016-05-20") x4-x3 --時(shí)間：POSIXct/POSIXlt ----距離1970-01-01的秒數(shù)/Sys.time() ----POSIXct:整數(shù)，常用于存入數(shù)據(jù)框 ----POSIlt:列表，還包含星期、年、月、日等信息 POSIXct轉(zhuǎn)為POSIXlt x<-Sys.time() p<-as.POSIXlt(x) names(unclass(p)) 獲取秒數(shù) p$sec 特定字符串格式轉(zhuǎn)為日期格式 x1<-"Jan 1, 2015 01:01" strptime(x1,"%B %d, %Y %H:%M")查看全部
-
--存儲(chǔ)表格數(shù)據(jù) --視為各元素長度相同的列表 ----每個(gè)元素代表一列數(shù)據(jù) ----每個(gè)元素的長度代表行數(shù) ----元素類型可以不同 創(chuàng)建數(shù)據(jù)框 df<-data.frame(id=c(1,2,3,4),name=c("a","b","c","d"),gender=c(TRUE,TRUE,FALSE,FALSE)) 查看數(shù)據(jù)框的行列，nrow(df) ncol(df)查看全部
-
3.$:按名字從列表和數(shù)據(jù)框中提取數(shù)據(jù)查看全部
-
2.[[]]：從列表或數(shù)據(jù)庫中提取數(shù)據(jù)查看全部
-
1.[]:提取一個(gè)或多個(gè)類型的數(shù)據(jù)查看全部
-
日期與時(shí)間 --日期：Date ----距離 1970-01-01的天數(shù) /date()/Sys.Date() ----weekdays()/months()/quarters() 獲取系統(tǒng)日期 x2<-Sys.Date() 將字符串轉(zhuǎn)為日期 x3<-as.Date("2016-03-27")#格式為yyyy-mm-dd 獲取日期的星期幾，月份，季度 weekdays(x3) months(x3) quarters(x3) julian(x3)#距離 1970-01-01的天數(shù) x4<-as.Date("2016-05-20") x4-x3 --時(shí)間：POSIXct/POSIXlt ----距離1970-01-01的秒數(shù)/Sys.time() ----POSIXct:整數(shù)，常用于存入數(shù)據(jù)框 ----POSIlt:列表，還包含星期、年、月、日等信息 POSIXct轉(zhuǎn)為POSIXlt x<-Sys.time() p<-as.POSIXlt(x) names(unclass(p)) 獲取秒數(shù) p$sec 特定字符串格式轉(zhuǎn)為日期格式 x1<-"Jan 1, 2015 01:01" strptime(x1,"%B %d, %Y %H:%M")查看全部
-
--數(shù)組的每一維度處理數(shù)據(jù) --apply(參數(shù))：apply(數(shù)組，維度，函數(shù)/函數(shù)名) x<- matrix(1:16,4,4) apply(x, 2, mean)#列求平均 apply(x,2,sum)#列求和 rowSums(x)#行求和 rowMeans(x)#行平均 colSums(x)#列 colMeans(x) x1<-matrix(rnorm(100),10,10) apply(x1,1,quantile,probs=c(0.25,0.75))查看全部
-
4.1 lapply --可以循環(huán)處理列表中的每一個(gè)元素 --lappy(參數(shù))：lappy(列表,函數(shù)/函數(shù)名,其他參數(shù)) --總是返回一個(gè)列表 x<-list(a=1:10,b=c(11,21,31,41,51)) lapply(x, mean)#平均值 sapply(x,mean) x1<-1:4 lapply(x1,runif)#runif() 產(chǎn)生均勻分布的隨機(jī)數(shù) lapply(x1,runif,min=0,max=100) x2<-list(a=matrix(1:6,2,3),b=matrix(4:7,2,2)) lapply(x2, function(m)m[1,])#獲取第一行內(nèi)容查看全部
-
x<-c(1,NA,2,NA,3) is.na(x) x[!is.na(x)]#獲取非缺失值 #獲取對(duì)應(yīng)位置都不是缺失值的數(shù)據(jù) x1<-c(1,NA,2,NA,3) y<-c("a","b",NA,"c",NA) z<-complete.cases(x,y) x[z] y[z]查看全部
-
3.4 列表的子集 --[[]]/$/[[]][]/[[]][[]] x<-list(id=1:4,height=170,gender="male") x[1]#獲取元素名稱和值 x[[1]]#獲取元素的值 x$id#獲取元素的值 x[c(1,3)]#獲取多個(gè)元素 使用變量 y<-"id" x[[y]]#==x[["id"]] x1<-list(a=list(1,2,3,4),b=c("Monday","Tuesday")) x1[[1]] x1[[1]][2] x1[[c(1,3)]]#獲取x1列表中第一個(gè)元素中第三個(gè)值 x1[[c(2,2)]]#獲取x1列表中第二個(gè)元素中第二個(gè)值 --不完全匹配 l<-list(aqqqa=1:10) l$aqqqa l$a l[["a",exact=FALSE]] l2<-list(aqqqa=1:10,b=1:2,abc=3:5) x$a #NULL x$aq查看全部
-
3.2 矩陣子集 x<-matrix(1:6,nrow=2,ncol=3) x[1,2] x[2,3] x[1,]#整行 x[2,c(1,3)]#第二行第1,3個(gè)元素 x[1,2,drop=FALSE] #返回矩陣查看全部
-
基本方法查看全部
-
本章小結(jié)查看全部
-
2.8 日期與時(shí)間 --日期：Date ----距離 1970-01-01的天數(shù) /date()/Sys.Date() ----weekdays()/months()/quarters() 獲取系統(tǒng)日期 x2<-Sys.Date() 將字符串轉(zhuǎn)為日期 x3<-as.Date("2016-03-27")#格式為yyyy-mm-dd 獲取日期的星期幾，月份，季度 weekdays(x3) months(x3) quarters(x3) julian(x3)#距離 1970-01-01的天數(shù) x4<-as.Date("2016-05-20") x4-x3 --時(shí)間：POSIXct/POSIXlt ----距離1970-01-01的秒數(shù)/Sys.time() ----POSIXct:整數(shù)，常用于存入數(shù)據(jù)框 ----POSIlt:列表，還包含星期、年、月、日等信息 POSIXct轉(zhuǎn)為POSIXlt x<-Sys.time() p<-as.POSIXlt(x) names(unclass(p)) 獲取秒數(shù) p$sec 特定字符串格式轉(zhuǎn)為日期格式 x1<-"Jan 1, 2015 01:01" strptime(x1,"%B %d, %Y %H:%M")查看全部
舉報(bào)
0/150
提交
取消