1. Calculations

a) (54)^(45)-56

result_a <- (54)^(45) - 56 result_a

b) 23-1*(8-12)

result_b <- 23 - 1 * (8 - 12) result_b

c) 56/8*(3+4)

result_c <- 56 / 8 * (3 + 4) result_c

d) 45-5*8+(8+9)

result_d <- 45 - 5 * 8 + (8 + 9) result_d

2. Create Vectors and Matrix

Vectors

a <- c(2, 5, 6, 7) b <- c(1, 0, 9, 8) c <- c(6, 5, 8, 3)

Combine vectors into matrix

matrix_abc <- rbind(a, b, c) colnames(matrix_abc) <- c(“Mon”, “Tue”, “Wed”, “Thu”) rownames(matrix_abc) <- c(“Present”, “Absent”, “On leave”) matrix_abc

Row Sums

row_sums <- rowSums(matrix_abc) row_sums

Column Sums

col_sums <- colSums(matrix_abc) col_sums