2016 Update

2016-12-05 22:15:40 +01:00 · 2016-12-05 22:15:40 +01:00 · dcf5d15da3
commit dcf5d15da3
parent 948b86eafa
7965 changed files with 139854 additions and 31002 deletions
--- a/Task/Identity-matrix/R/identity-matrix-2.r
+++ b/Task/Identity-matrix/R/identity-matrix-2.r
@ -1,4 +1,7 @@
-     [,1] [,2] [,3]
-[1,]    1    0    0
-[2,]    0    1    0
-[3,]    0    0    1
+Identity_matrix=function(size){
+  x=matrix(0,size,size)
+  for (i in 1:size) {
+    x[i,i]=1
+  }
+  return(x)
+}
--- a/Task/Identity-matrix/R/identity-matrix.r
+++ b/Task/Identity-matrix/R/identity-matrix.r
@ -1 +0,0 @@
-diag(3)