pract1c.R

vec1<-20:30
vec2<-LETTERS[2:5]
mat1<-matrix(1:20,nrow=4, ncol=5 )
a1=array(51:70, dim=c(2,10))
newList1<-list(vec1, mat1,a1)

print(vec1)

##  [1] 20 21 22 23 24 25 26 27 28 29 30

print(vec2)

## [1] "B" "C" "D" "E"

print(mat1)

##      [,1] [,2] [,3] [,4] [,5]
## [1,]    1    5    9   13   17
## [2,]    2    6   10   14   18
## [3,]    3    7   11   15   19
## [4,]    4    8   12   16   20

print(a1)

##      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
## [1,]   51   53   55   57   59   61   63   65   67    69
## [2,]   52   54   56   58   60   62   64   66   68    70

print(newList1)

## [[1]]
##  [1] 20 21 22 23 24 25 26 27 28 29 30
## 
## [[2]]
##      [,1] [,2] [,3] [,4] [,5]
## [1,]    1    5    9   13   17
## [2,]    2    6   10   14   18
## [3,]    3    7   11   15   19
## [4,]    4    8   12   16   20
## 
## [[3]]
##      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
## [1,]   51   53   55   57   59   61   63   65   67    69
## [2,]   52   54   56   58   60   62   64   66   68    70