This is an R file. Check it out.

    (5*4)^(4*5)-56
## [1] 1.048576e+26
    23-1*(8-12)
## [1] 27
    56/8*(3+4)
## [1] 49
    45-5*8+(8+9)
## [1] 22
f<-c(2,5,6,7)
g<-c(1,0,9,8)
h<-c(6,5,8,3)

mat<-rbind(f,g,h)

mat
##   [,1] [,2] [,3] [,4]
## f    2    5    6    7
## g    1    0    9    8
## h    6    5    8    3
#assigning names of the column 
colnames(mat)<-c("Mon", "Tue", "Wed", "Thu")

#assigning names of the row
rownames(mat)<-c("Present", "Absent", "On leave")

mat
##          Mon Tue Wed Thu
## Present    2   5   6   7
## Absent     1   0   9   8
## On leave   6   5   8   3
#Total Sum of each row
row<-rowSums(mat)
row
##  Present   Absent On leave 
##       20       18       22
#Total Sum of each column
col<-colSums(mat)
col
## Mon Tue Wed Thu 
##   9  10  23  18