matrix operations
ram<-matrix(c(88,85,83,81,78,62,61,54,60,65,90,92,91,89,90),ncol=3)
colnames(ram)<-c("vijayawad","hyderabad","delhi")
rownames(ram)<-paste("11/",12:16,sep='')
c
rbind()
ndata<-matrix(c(98,78,66,55,99,66),nrow=1)
rownames(ndata)<-"11/17"
colnames(ndata)<-c(colnames(tem1),colnames(temp2))
rbind<-(cbind(temp1,temp2),ndata)
R version 3.3.2 (2016-10-31) -- "Sincere Pumpkin Patch"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> temp2
Error: object 'temp2' not found
> temp2<-matrix(c(99,85,83,81,66,62,61,54,60,88,90,92,71,89,90),ncol=3)
> rownames(temp2)<-paste("Nov/",12:16,sep='')
> colnames(temp2)<-c("Chennai","Pune","Bengalore")
> temp1<-matrix(c(88,85,83,81,78,62,61,54,60,65,90,92,91,89,90),ncol=3)
> colnames(temp1)<-c("vijayawad","hyderabad","delhi")
> rownames(temp1)<-paste("Nov/",12:16,sep='')
> temp2
Chennai Pune Bengalore
Nov/12 99 62 90
Nov/13 85 61 92
Nov/14 83 54 71
Nov/15 81 60 89
Nov/16 66 88 90
> temp1
vijayawad hyderabad delhi
Nov/12 88 62 90
Nov/13 85 61 92
Nov/14 83 54 91
Nov/15 81 60 89
Nov/16 78 65 90
> cbind(temp1,temp2)
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
> temp12<-cbind(temp1,temp2)
> temp12
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
> newdata<-matrix(c(98,78,66,55,99,66),nrow=1)
> newdata
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 98 78 66 55 99 66
> rnames(newdats)<-"Nov/17"
Error in rnames(newdats) <- "Nov/17" : object 'newdats' not found
> rnames(newdata)<-"Nov/17"
Error in rnames(newdata) <- "Nov/17" : could not find function "rnames<-"
> rname(newdata)<-"Nov/17"
Error in rname(newdata) <- "Nov/17" : could not find function "rname<-"
> rownames(newdata)<-"Nov/17"
> newdata
[,1] [,2] [,3] [,4] [,5] [,6]
Nov/17 98 78 66 55 99 66
> colnames(newdata)<-c(colnames(temp12))
> newdata
vijayawad hyderabad delhi Chennai Pune
Nov/17 98 78 66 55 99
Bengalore
Nov/17 66
> rbind(temp12,newdata)
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Nov/17 98 78 66 55 99
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
Nov/17 66
> ftemp<-rbind(temp12,newdata)
> ftemp
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Nov/17 98 78 66 55 99
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
Nov/17 66
> c(ftemp)
[1] 88 85 83 81 78 98 62 61 54 60 65 78 90 92 91
[16] 89 90 66 99 85 83 81 66 55 62 61 54 60 88 99
[31] 90 92 71 89 90 66
> length(ftemp)
[1] 36
>
ram<-matrix(c(88,85,83,81,78,62,61,54,60,65,90,92,91,89,90),ncol=3)
colnames(ram)<-c("vijayawad","hyderabad","delhi")
rownames(ram)<-paste("11/",12:16,sep='')
c
rbind()
ndata<-matrix(c(98,78,66,55,99,66),nrow=1)
rownames(ndata)<-"11/17"
colnames(ndata)<-c(colnames(tem1),colnames(temp2))
rbind<-(cbind(temp1,temp2),ndata)
R version 3.3.2 (2016-10-31) -- "Sincere Pumpkin Patch"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> temp2
Error: object 'temp2' not found
> temp2<-matrix(c(99,85,83,81,66,62,61,54,60,88,90,92,71,89,90),ncol=3)
> rownames(temp2)<-paste("Nov/",12:16,sep='')
> colnames(temp2)<-c("Chennai","Pune","Bengalore")
> temp1<-matrix(c(88,85,83,81,78,62,61,54,60,65,90,92,91,89,90),ncol=3)
> colnames(temp1)<-c("vijayawad","hyderabad","delhi")
> rownames(temp1)<-paste("Nov/",12:16,sep='')
> temp2
Chennai Pune Bengalore
Nov/12 99 62 90
Nov/13 85 61 92
Nov/14 83 54 71
Nov/15 81 60 89
Nov/16 66 88 90
> temp1
vijayawad hyderabad delhi
Nov/12 88 62 90
Nov/13 85 61 92
Nov/14 83 54 91
Nov/15 81 60 89
Nov/16 78 65 90
> cbind(temp1,temp2)
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
> temp12<-cbind(temp1,temp2)
> temp12
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
> newdata<-matrix(c(98,78,66,55,99,66),nrow=1)
> newdata
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 98 78 66 55 99 66
> rnames(newdats)<-"Nov/17"
Error in rnames(newdats) <- "Nov/17" : object 'newdats' not found
> rnames(newdata)<-"Nov/17"
Error in rnames(newdata) <- "Nov/17" : could not find function "rnames<-"
> rname(newdata)<-"Nov/17"
Error in rname(newdata) <- "Nov/17" : could not find function "rname<-"
> rownames(newdata)<-"Nov/17"
> newdata
[,1] [,2] [,3] [,4] [,5] [,6]
Nov/17 98 78 66 55 99 66
> colnames(newdata)<-c(colnames(temp12))
> newdata
vijayawad hyderabad delhi Chennai Pune
Nov/17 98 78 66 55 99
Bengalore
Nov/17 66
> rbind(temp12,newdata)
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Nov/17 98 78 66 55 99
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
Nov/17 66
> ftemp<-rbind(temp12,newdata)
> ftemp
vijayawad hyderabad delhi Chennai Pune
Nov/12 88 62 90 99 62
Nov/13 85 61 92 85 61
Nov/14 83 54 91 83 54
Nov/15 81 60 89 81 60
Nov/16 78 65 90 66 88
Nov/17 98 78 66 55 99
Bengalore
Nov/12 90
Nov/13 92
Nov/14 71
Nov/15 89
Nov/16 90
Nov/17 66
> c(ftemp)
[1] 88 85 83 81 78 98 62 61 54 60 65 78 90 92 91
[16] 89 90 66 99 85 83 81 66 55 62 61 54 60 88 99
[31] 90 92 71 89 90 66
> length(ftemp)
[1] 36
>
No comments:
Post a Comment
Note: only a member of this blog may post a comment.