#矩陣
是將R行和列組成的數(shù)組 數(shù)據(jù)元素要求是同一種類型
函數(shù):
matrix
data 矩陣的元素向量的形式
nrow 行數(shù)
ncol 列數(shù)
byrow 是否按照行排列 默認(rèn)是列排序 true 按行 false 按列
dimnames 可選 對(duì)行列進(jìn)行命名
m<-matrix(1:6,nrow=2,ncol=3,byrow =T,dimnames =list(c('r1','r2'),c('c1','c2','c3')))
加入byrow 進(jìn)行排列
m<-matrix(1:6,nrow=2,ncol=3,dimnames =list(c('r1','r2'),c('c1','c2','c3')))
數(shù)值訪問矩陣元素
m[1,1] 1行1列
m[1,] 第一行
m[,1]第一列
邏輯訪問矩陣元素
m[c(T,F),] 第一行
行的名字進(jìn)行訪問
m['r1',] 第一行
#編輯元素
m[1,]<-c(100,99,98)
批量賦值整行
m[1,]<-100 第一行r1的長(zhǎng)度為3,100是1個(gè)長(zhǎng)度,100會(huì)被使用三次
矩陣轉(zhuǎn)置
t(m) 列變行 行變列
#數(shù)組 數(shù)據(jù)類型也是統(tǒng)一的
?array
#data 向量
#dim 維度
#dimnames 維度名稱的列表 可選
array(1:10) #一維的數(shù)組就是向量
array(1:10,dim = c(2,5))#矩陣
dim1<-c('A1','A2')
dim2<-c('B1','B2','B3')
dim3<-c('C1','C2')
arry3<-array(1:12,c(2,3,2),dimnames = list(dim1,dim2,dim3))
array(1:12,c(2,3,2))#三維數(shù)組 創(chuàng)建兩個(gè)矩形矩陣 每2行3列
arry3[,,'C1']
arry3[,,1]
arry3[,,c(T,F)]
#數(shù)據(jù)框 可以包含各種數(shù)據(jù)類型 每列叫做變量 每行叫做觀測(cè)樣本
data.frame()
student<-data.frame(ID=c(1001,1002,1003),
NAME=c('lili','bobo','sam'),
GENDER=c('F','M','M')) #會(huì)把類型轉(zhuǎn)換為因子
student<-data.frame(ID=c(1001,1002,1003),
NAME=c('lili','bobo','sam'),
GENDER=c('F','M','M'),stringsAsFactors = F) #加上參數(shù)string關(guān)閉轉(zhuǎn)換
student[1,1]
student[1,]
student[,1]
student['ID']
student[,'ID']
student$ID
student[c('ID','NAME')]
student[1,1]<-1009
student[c('ID','NAME')]
#列表 最復(fù)雜 可以包含各種元素
list()
list1<-list(a=1,b='char',c=m,d=student)
list1[[1]]
list1[['a']]
list1[[4]] #訪問需要加雙重[[]]
list1[4]
class(list1[4])
總結(jié)
1、 操作題:
將 1,2,3,…,12 構(gòu)成兩個(gè) 3*4 的矩陣,矩陣 A 是按列輸入,矩陣 B 是按行輸入。
2、 操作題:
將矩陣 B 的第一列的元素都改成 100.
3、 操作題:
ID name weight
1 張三 60
2 李四 70
3 王五 80
創(chuàng)建數(shù)據(jù)框?qū)⑺?wtdata,要求第一、三列的數(shù)據(jù)類型是數(shù)值型的,第二列數(shù)據(jù)類
型是字符型的。
4、 操作題:
返回?cái)?shù)據(jù)框 wtdata 第一、三行的信息
5、 操作題:
創(chuàng)建一個(gè)列表,將它命名成 wtlist,列表的長(zhǎng)度是 3,列表的第 1 個(gè)元素是矩陣 A,列
表的第 2 個(gè)元素是矩陣 B,列表的第 3 個(gè)元素是 wtdata
6、 操作題:
返回列表 wtlist 第 1 個(gè)元素的信息。
1.A<-matrix(1:12,nrow = 3,ncol = 4,)
A
B<-matrix(1:12,nrow = 3,ncol = 4,byrow = T)
B
B[1,]<-c(1,2,3,4)
B
2.B[,1]<-100
B
B[,1]<-1,5,9
3.peson<-data.frame(ID=c(1,2,3),name=c('張三','李四','王五'),weight=c(60,70,80),stringsAsFactors = F)
4.peson[c(1,3)]
peson[c(T,F,T)]
peson[2,3]
5.wtlist<-list(a=A,b=B,c=peson)
6.wtlist[1]
wtlist[[1]]
另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)cdcxhl.cn,海內(nèi)外云服務(wù)器15元起步,三天無(wú)理由+7*72小時(shí)售后在線,公司持有idc許可證,提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國(guó)服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案,具有“安全穩(wěn)定、簡(jiǎn)單易用、服務(wù)可用性高、性價(jià)比高”等特點(diǎn)與優(yōu)勢(shì),專為企業(yè)上云打造定制,能夠滿足用戶豐富、多元化的應(yīng)用場(chǎng)景需求。
分享題目:R復(fù)雜數(shù)據(jù)類型thirdday-創(chuàng)新互聯(lián)
地址分享:http://www.rwnh.cn/article42/cchphc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站制作、面包屑導(dǎo)航、品牌網(wǎng)站設(shè)計(jì)、靜態(tài)網(wǎng)站、全網(wǎng)營(yíng)銷推廣、品牌網(wǎng)站制作
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)