Stochastic Process and Queueing Theory Lab N.

Potharaju
22MTC17 160123771301
Date : 27-01-2025

Aim : To Implement Matrix Operations. 11, 3, 8, 15, 14, 2, 13, 1, 13, 20, 17, 17, 8, 16, 9, 6, 9, 10, 18, 15,
20, 3, 17, 10, 18,
> A=matrix(c(1,3,5,7),nrow=2,ncol=2,byrow=T 12, 20, 20, 6, 15, 2, 19, 3, 12, 13, 3, 11, 8, 1, 1, 18, 17, 9, 19, 10,
RUE) 10, 14, 4, 2, 18, 5,
> print(A) 12, 17, 7, 20, 18, 16, 5, 16, 18, 1, 4, 18, 14, 18, 17, 8
[,1] [,2]
[1,] 1 3
[2,] 5 7 > #Convert Raw data into frequency distribu
> rownames(A)=c("R1","R2") tion
> rownames(A) > data_1=c(7, 3, 6, 8, 17, 16, 19, 17, 3, 1
[1] "R1" "R2" 2, 17, 13, 10, 6, 1, 7, 5, 18, 14, 11, 12,
> colnames(A)=c("C1","C2") 5, 1, 19, 15, 6, 15, 18, 8, 15, 5, 13, 20,
> colnames(A) 8, 10, 17, 10, 2, 3, 4, 2, 9, 2, 12, 7, 11,
[1] "C1" "C2" 19, 8, 20, 8, 19, 14, 19, 6, 9, 1, 3, 11, 8
> print(A) , 17, 1, 17, 8, 8, 20, 10, 12, 19, 18, 6, 1
C1 C2 4, 9, 5, 14, 20, 6, 10, 7, 4, 15, 11, 5, 2,
R1 1 3 14, 17, 3, 14, 1, 8, 15, 7, 9, 17, 7, 3, 7,
R2 5 7 4, 17, 14, 3, 7, 17, 17, 3, 9, 9, 18, 9, 14
> rowSums(A) , 15, 1, 1, 2, 8, 19, 9, 16, 15, 4, 18, 2,
R1 R2 4, 17, 13, 5, 14, 20, 18, 20, 10, 2, 18, 4,
4 12 11, 3, 8, 15, 14, 2, 13, 1, 13, 20, 17, 17,
> colSums(A) 8, 16, 9, 6, 9, 10, 18, 15, 20, 3, 17, 10,
C1 C2 18, 12, 20, 20, 6, 15, 2, 19, 3, 12, 13, 3,
11, 8, 1, 1, 18, 17, 9, 19, 10, 10, 14, 4,
6 10 2, 18, 5, 12, 17, 7, 20, 18, 16, 5, 16, 18,
> T_R=sum(rowSums(A))
> print(T_R) 1, 4, 18, 14, 18, 17, 8
[1] 16 + )
> data_1
> T_C=sum(colSums(A)) [1] 7 3 6 8 17 16 19 17 3 12 17 13 1
> print(T_C) 0 6 1 7 5 18 14 11 12 5 1 19
[1] 16 [25] 15 6 15 18 8 15 5 13 20 8 10 17 1
> B=matrix(c(3,7,9,11),nrow=2,ncol=2,byrow= 0 2 3 4 2 9 2 12 7 11 19 8
TRUE)
> print(B) [49] 20 8 19 14 19 6 9 1 3 11 8 17
1 17 8 8 20 10 12 19 18 6 14 9
[1,] [,1] [,2] [73] 5 14 20 6 10 7 4 15 11 5 2 14 1
3 7 7 3 14 1 8 15 7 9 17 7 3 7
[2,] 9 11 [97] 4 17 14 3 7 17 17 3 9 9 18 9 1
> print(A+B) 4 15 1 1 2 8 19 9 16 15 4 18
C1 C2 [121] 2 4 17 13 5 14 20 18 20 10 2 18
R1 4 10 4 11 3 8 15 14 2 13 1 13 20 17
R2 14 18 [145] 17 8 16 9 6 9 10 18 15 20 3 17 1
> print(A-B)
C1 C2 0 18 12 20 20 6 15 2 19 3 12 13
R1 -2 -4 [169] 3 11 8 1 1 18 17 9 19 10 10 14
R2 -4 -4 4 2 18 5 12 17 7 20 18 16 5 16
> print(B-A) [193] 18 1 4 18 14 18 17 8
C1 C2 > length(data_1)
R1 2 4 [1] 200
R2 4 4 > range(data_1)
> print(3*A-2*B) [1] 1 20
C1 C2 > max(data_1)
R1 -3 -5 [1] 20
R2 -3 -1 > min(data_1)
> print(A%*%B) [1] 1
[,1] [,2] > bin=seq(0,21,by=2)
R1 30 40 > bin
R2 78 112 [1] 0 2 4 6 8 10 12 14 16 18 20
> CI=cut(data_1,bin,right=FALSE)
> print(CI)
[1] [6,8) [2,4) [6,8) [8,10) [16,1
Aim : To Convert Raw data into Frequency Distribution. 8) [16,18) [18,20) [16,18) [2,4)
[10] [12,14) [16,18) [12,14) [10,12) [6,8)
PROBLEM 1 [0,2) [6,8) [4,6) [18,20)
[19] [14,16) [10,12) [12,14) [4,6) [0,2)
1. A school has 10 classes and each class has 20 sections. Every [18,20) [14,16) [6,8) [14,16)
[28] [18,20) [8,10) [14,16) [4,6) [12,1
section has 20 4) <NA> [8,10) [10,12) [16,18)
students. An assignment was given to all the sections. The [37] [10,12) [2,4) [2,4) [4,6) [2,4)
number of students who [8,10) [2,4) [12,14) [6,8)
completed and submitted the assignment in given time was [46] [10,12) [18,20) [8,10) <NA> [8,10
recorded as follows and ) [18,20) [14,16) [18,20) [6,8)
stored in a data vector as assignment. [55] [8,10) [0,2) [2,4) [10,12) [8,10
7, 3, 6, 8, 17, 16, 19, 17, 3, 12, 17, 13, 10, 6, 1, 7, 5, 18, 14, 11, ) [16,18) [0,2) [16,18) [8,10)
[64] [8,10) <NA> [10,12) [12,14) [18,2
12, 5, 1, 19, 15, 6, 0) [18,20) [6,8) [14,16) [8,10)
15, 18, 8, 15, 5, 13, 20, 8, 10, 17, 10, 2, 3, 4, 2, 9, 2, 12, 7, 11, [73] [4,6) [14,16) <NA> [6,8) [10,1
19, 8, 20, 8, 19, 14, 2) [6,8) [4,6) [14,16) [10,12)
19, 6, 9, 1, 3, 11, 8, 17, 1, 17, 8, 8, 20, 10, 12, 19, 18, 6, 14, 9, 5, [82] [4,6) [2,4) [14,16) [16,18) [2,4)
14, 20, 6, 10, 7, 4, [14,16) [0,2) [8,10) [14,16)
15, 11, 5, 2, 14, 17, 3, 14, 1, 8, 15, 7, 9, 17, 7, 3, 7, 4, 17, 14, 3, [91] [6,8) [8,10) [16,18) [6,8) [2,4)
[6,8) [4,6) [16,18) [14,16)
7, 17, 17, 3, 9, 9, 18, [100] [2,4) [6,8) [16,18) [16,18) [2,4)
9, 14, 15, 1, 1, 2, 8, 19, 9, 16, 15, 4, 18, 2, 4, 17, 13, 5, 14, 20, [8,10) [8,10) [18,20) [8,10)
18, 20, 10, 2, 18, 4, [109] [14,16) [14,16) [0,2) [0,2) [2,4)
[8,10) [18,20) [8,10) [16,18)
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

[118] [14,16) [4,6) [18,20) [2,4) [4,6) 34.80, 30.40, 35.66, 19.22, 23.83, 22.13, 28.04, 18.94, 17.11,
[16,18) [12,14) [4,6) [14,16) 25.61, 22.20, 22.55,
[127] <NA> [18,20) <NA> [10,12) [2,4) 38.72, 29.02, 37.59, 24.03, 33.16, 22.06, 12.73, 19.80, 26.90,
[18,20) [4,6) [10,12) [2,4)
[136] [8,10) [14,16) [14,16) [2,4) [12,1 34.65, 34.53, 13.52,
4) [0,2) [12,14) <NA> [16,18) 26.00, 12.40, 28.38, 29.87, 34.40, 17.66, 38.39, 13.75, 32.68,
[145] [16,18) [8,10) [16,18) [8,10) [6,8) 37.04, 17.67, 17.57,
[8,10) [10,12) [18,20) [14,16) 23.64, 16.38, 19.99, 21.69, 12.56, 20.74, 31.07, 39.54, 14.69,
[154] <NA> [2,4) [16,18) [10,12) [18,2 22.88, 30.84, 18.64,
0) [12,14) <NA> <NA> [6,8) 14.50, 18.92, 10.06, 20.14, 12.11, 35.99, 16.14, 17.07, 10.57,
[163] [14,16) [2,4) [18,20) [2,4) [12,1 11.85, 38.06, 19.33,
4) [12,14) [2,4) [10,12) [8,10)
[172] [0,2) [0,2) [18,20) [16,18) [8,10 20.76, 34.64, 15.40, 22.03, 23.19, 18.23, 36.38, 34.19, 35.24,
) [18,20) [10,12) [10,12) [14,16) 22.85, 12.13, 25.68,
[181] [4,6) [2,4) [18,20) [4,6) [12,1 24.17, 25.02, 39.56, 35.35, 19.37, 37.72, 37.34, 28.14, 26.13,
4) [16,18) [6,8) <NA> [18,20) 32.19, 26.10, 12.21,
[190] [16,18) [4,6) [16,18) [18,20) [0,2) 18.45, 28.98, 37.70, 28.06, 33.04, 15.17, 15.35, 38.36, 17.82,
[4,6) [18,20) [14,16) [18,20) 35.34, 26.69, 37.47,
[199] [16,18) [8,10)
10 Levels: [0,2) [2,4) [4,6) [6,8) [8,10) [ 34.31, 34.11, 37.25, 33.83, 31.09, 13.16, 38.58, 28.57, 26.14,
10,12) [12,14) [14,16) ... [18,20) 16.39, 24.19, 12.24,
> table(CI) 16.00, 15.27, 13.49, 26.70, 38.88, 27.15, 25.03, 11.00, 32.35,
CI 24.57, 18.01, 30.40,
[0,2) [2,4) [4,6) [6,8) [8,10) [10 20.01, 11.92, 36.43, 37.64, 11.40, 15.95, 36.19, 22.63, 14.56,
,12) [12,14) [14,16) [16,18) 33.44, 27.24, 33.91
11 22 16 17 25
16 13 22 23 > #Convert Raw data into frequency distribu
[18,20) tion
24 > data_2=c(30.21, 35.27, 30.63, 25.65, 37.6
> transform(table(CI)) 1, 24.44, 16.01, 14.80, 14.17, 38.35, 16.39
CI Freq , 12.32, 23.93, 26.49, 39.41, 39.52, 24.39,
1 [0,2) 11 30.50, 21.99, 28.66, 30.30, 34.69, 21.83, 2
2 [2,4) 22 2.12, 21.72, 38.14, 18.03, 32.65, 35.02, 10
3 [4,6) 16 .77, 29.05, 14.30, 27.75, 34.98, 28.16, 24.
4 [6,8) 17 05, 30.29, 29.00, 34.37, 24.05, 30.76, 20.0
5 [8,10) 25 5, 18.27, 29.45, 30.07, 31.92, 36.84, 28.82
6 [10,12) 16 , 39.41, 39.02, 36.63, 36.69, 21.78, 17.87,
7 [12,14) 13 34.52, 16.74, 18.77, 32.85, 16.69, 33.37, 3
8 [14,16) 22 5.14, 13.21, 28.18, 20.65, 37.14, 21.60, 27
9 [16,18) 23 .78, 32.69, 25.42, 35.37, 14.38, 21.73, 35.
10 [18,20) 24 04, 29.39, 19.42, 11.69, 32.79, 37.28, 23.9
4, 31.59, 28.06, 18.94, 18.04, 31.63, 36.89
PROBLEM 2 , 36.25, 24.93, 14.67, 29.29, 26.50, 20.58,
22.48, 36.47, 38.88, 35.94, 20.88, 34.48, 1
2.A batch of 300 cars were used to find the mileage of the cars. 7.28, 20.53, 24.87, 34.59, 37.23, 14.33, 23
Following .80, 19.57, 25.59, 33.74, 15.57, 37.45, 23.
observations on the number of kilometres per litre of petrol were 43, 12.10, 34.75, 14.97, 11.22, 19.75, 14.1
7, 10.27, 18.31, 31.77, 38.69, 11.59, 36.86
recorded and stored , 20.99, 16.83, 34.24, 33.96, 22.84, 36.37,
in a data vector miles. 18.57, 33.85, 29.00, 15.51, 29.83, 36.51, 3
30.21, 35.27, 30.63, 25.65, 37.61, 24.44, 16.01, 14.80, 14.17, 2.34, 13.48, 13.94, 33.68, 34.03, 27.77, 20
38.35, 16.39, 12.32, .38, 32.40, 38.18, 32.72, 13.59, 37.18, 13.
23.93, 26.49, 39.41, 39.52, 24.39, 30.50, 21.99, 28.66, 30.30, 51, 12.71, 24.59, 11.63, 31.13, 29.99, 34.1
34.69, 21.83, 22.12, 4, 31.34, 33.16, 11.50, 26.70, 11.01, 18.73
21.72, 38.14, 18.03, 32.65, 35.02, 10.77, 29.05, 14.30, 27.75, , 37.66, 14.66, 15.02, 10.24, 36.92, 21.97,
24.00, 23.04, 28.52, 34.80, 30.40, 35.66, 1
34.98, 28.16, 24.05, 9.22, 23.83, 22.13, 28.04, 18.94, 17.11, 25
30.29, 29.00, 34.37, 24.05, 30.76, 20.05, 18.27, 29.45, 30.07, .61, 22.20, 22.55, 38.72, 29.02, 37.59, 24.
31.92, 36.84, 28.82, 03, 33.16, 22.06, 12.73, 19.80, 26.90, 34.6
39.41, 39.02, 36.63, 36.69, 21.78, 17.87, 34.52, 16.74, 18.77, 5, 34.53, 13.52, 26.00, 12.40, 28.38, 29.87
32.85, 16.69, 33.37, , 34.40, 17.66, 38.39, 13.75, 32.68, 37.04,
35.14, 13.21, 28.18, 20.65, 37.14, 21.60, 27.78, 32.69, 25.42, 17.67, 17.57, 23.64, 16.38, 19.99, 21.69, 1
2.56, 20.74, 31.07, 39.54, 14.69, 22.88, 30
35.37, 14.38, 21.73, .84, 18.64, 14.50, 18.92, 10.06, 20.14, 12.
35.04, 29.39, 19.42, 11.69, 32.79, 37.28, 23.94, 31.59, 28.06, 11, 35.99, 16.14, 17.07, 10.57, 11.85, 38.0
18.94, 18.04, 31.63, 6, 19.33, 20.76, 34.64, 15.40, 22.03, 23.19
36.89, 36.25, 24.93, 14.67, 29.29, 26.50, 20.58, 22.48, 36.47, , 18.23, 36.38, 34.19, 35.24, 22.85, 12.13,
38.88, 35.94, 20.88, 25.68, 24.17, 25.02, 39.56, 35.35, 19.37, 3
34.48, 17.28, 20.53, 24.87, 34.59, 37.23, 14.33, 23.80, 19.57, 7.72, 37.34, 28.14, 26.13, 32.19, 26.10, 12
25.59, 33.74, 15.57, .21, 18.45, 28.98, 37.70, 28.06, 33.04, 15.
17, 15.35, 38.36, 17.82, 35.34, 26.69, 37.4
37.45, 23.43, 12.10, 34.75, 14.97, 11.22, 19.75, 14.17, 10.27, 7, 34.31, 34.11, 37.25, 33.83, 31.09, 13.16
18.31, 31.77, 38.69, , 38.58, 28.57, 26.14, 16.39, 24.19, 12.24,
11.59, 36.86, 20.99, 16.83, 34.24, 33.96, 22.84, 36.37, 18.57, 16.00, 15.27, 13.49, 26.70, 38.88, 27.15, 2
33.85, 29.00, 15.51, 5.03, 11.00, 32.35, 24.57, 18.01, 30.40, 20
29.83, 36.51, 32.34, 13.48, 13.94, 33.68, 34.03, 27.77, 20.38, .01, 11.92, 36.43, 37.64, 11.40, 15.95, 36.
32.40, 38.18, 32.72, 19, 22.63, 14.56, 33.44, 27.24, 33.91
13.59, 37.18, 13.51, 12.71, 24.59, 11.63, 31.13, 29.99, 34.14, + )
> data_2
31.34, 33.16, 11.50, [1] 30.21 35.27 30.63 25.65 37.61 24.44 1
26.70, 11.01, 18.73, 37.66, 14.66, 15.02, 10.24, 36.92, 21.97, 6.01 14.80 14.17 38.35 16.39 12.32
24.00, 23.04, 28.52, [13] 23.93 26.49 39.41 39.52 24.39 30.50 2
1.99 28.66 30.30 34.69 21.83 22.12
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

[25] 21.72 38.14 18.03 32.65 35.02 10.77 2 [109] [35,40) [20,25) [10,15) [30,35) [10,1
9.05 14.30 27.75 34.98 28.16 24.05 5) [10,15) [15,20) [10,15) [10,15)
[37] 30.29 29.00 34.37 24.05 30.76 20.05 1 [118] [15,20) [30,35) [35,40) [10,15) [35,4
8.27 29.45 30.07 31.92 36.84 28.82 0) [20,25) [15,20) [30,35) [30,35)
[49] 39.41 39.02 36.63 36.69 21.78 17.87 3 [127] [20,25) [35,40) [15,20) [30,35) [25,3
4.52 16.74 18.77 32.85 16.69 33.37 0) [15,20) [25,30) [35,40) [30,35)
[61] 35.14 13.21 28.18 20.65 37.14 21.60 2 [136] [10,15) [10,15) [30,35) [30,35) [25,3
7.78 32.69 25.42 35.37 14.38 21.73 0) [20,25) [30,35) [35,40) [30,35)
[73] 35.04 29.39 19.42 11.69 32.79 37.28 2 [145] [10,15) [35,40) [10,15) [10,15) [20,2
3.94 31.59 28.06 18.94 18.04 31.63 5) [10,15) [30,35) [25,30) [30,35)
[85] 36.89 36.25 24.93 14.67 29.29 26.50 2 [154] [30,35) [30,35) [10,15) [25,30) [10,1
0.58 22.48 36.47 38.88 35.94 20.88 5) [15,20) [35,40) [10,15) [15,20)
[97] 34.48 17.28 20.53 24.87 34.59 37.23 1 [163] [10,15) [35,40) [20,25) [20,25) [20,2
4.33 23.80 19.57 25.59 33.74 15.57 5) [25,30) [30,35) [30,35) [35,40)
[109] 37.45 23.43 12.10 34.75 14.97 11.22 1 [172] [15,20) [20,25) [20,25) [25,30) [15,2
9.75 14.17 10.27 18.31 31.77 38.69 0) [15,20) [25,30) [20,25) [20,25)
[121] 11.59 36.86 20.99 16.83 34.24 33.96 2 [181] [35,40) [25,30) [35,40) [20,25) [30,3
2.84 36.37 18.57 33.85 29.00 15.51 5) [20,25) [10,15) [15,20) [25,30)
[133] 29.83 36.51 32.34 13.48 13.94 33.68 3 [190] [30,35) [30,35) [10,15) [25,30) [10,1
4.03 27.77 20.38 32.40 38.18 32.72 5) [25,30) [25,30) [30,35) [15,20)
[145] 13.59 37.18 13.51 12.71 24.59 11.63 3 [199] [35,40) [10,15) [30,35) [35,40) [15,2
1.13 29.99 34.14 31.34 33.16 11.50 0) [15,20) [20,25) [15,20) [15,20)
[157] 26.70 11.01 18.73 37.66 14.66 15.02 1 [208] [20,25) [10,15) [20,25) [30,35) [35,4
0.24 36.92 21.97 24.00 23.04 28.52 0) [10,15) [20,25) [30,35) [15,20)
[169] 34.80 30.40 35.66 19.22 23.83 22.13 2 [217] [10,15) [15,20) [10,15) [20,25) [10,1
8.04 18.94 17.11 25.61 22.20 22.55 5) [35,40) [15,20) [15,20) [10,15)
[181] 38.72 29.02 37.59 24.03 33.16 22.06 1 [226] [10,15) [35,40) [15,20) [20,25) [30,3
2.73 19.80 26.90 34.65 34.53 13.52 5) [15,20) [20,25) [20,25) [15,20)
[193] 26.00 12.40 28.38 29.87 34.40 17.66 3 [235] [35,40) [30,35) [35,40) [20,25) [10,1
8.39 13.75 32.68 37.04 17.67 17.57 5) [25,30) [20,25) [25,30) [35,40)
[205] 23.64 16.38 19.99 21.69 12.56 20.74 3 [244] [35,40) [15,20) [35,40) [35,40) [25,3
1.07 39.54 14.69 22.88 30.84 18.64 0) [25,30) [30,35) [25,30) [10,15)
[217] 14.50 18.92 10.06 20.14 12.11 35.99 1 [253] [15,20) [25,30) [35,40) [25,30) [30,3
6.14 17.07 10.57 11.85 38.06 19.33 5) [15,20) [15,20) [35,40) [15,20)
[229] 20.76 34.64 15.40 22.03 23.19 18.23 3 [262] [35,40) [25,30) [35,40) [30,35) [30,3
6.38 34.19 35.24 22.85 12.13 25.68 5) [35,40) [30,35) [30,35) [10,15)
[241] 24.17 25.02 39.56 35.35 19.37 37.72 3 [271] [35,40) [25,30) [25,30) [15,20) [20,2
7.34 28.14 26.13 32.19 26.10 12.21 5) [10,15) [15,20) [15,20) [10,15)
[253] 18.45 28.98 37.70 28.06 33.04 15.17 1 [280] [25,30) [35,40) [25,30) [25,30) [10,1
5.35 38.36 17.82 35.34 26.69 37.47 5) [30,35) [20,25) [15,20) [30,35)
[265] 34.31 34.11 37.25 33.83 31.09 13.16 3 [289] [20,25) [10,15) [35,40) [35,40) [10,1
8.58 28.57 26.14 16.39 24.19 12.24 5) [15,20) [35,40) [20,25) [10,15)
[277] 16.00 15.27 13.49 26.70 38.88 27.15 2 [298] [30,35) [25,30) [30,35)
5.03 11.00 32.35 24.57 18.01 30.40 Levels: [10,15) [15,20) [20,25) [25,30) [30
[289] 20.01 11.92 36.43 37.64 11.40 15.95 3 ,35) [35,40)
6.19 22.63 14.56 33.44 27.24 33.91 > table(CI)
> length(data_2) CI
[1] 300 [10,15) [15,20) [20,25) [25,30) [30,35) [35
> range(data_2) ,40)
[1] 10.06 39.56 46 47 50 44 57
> max(data_2) 56
[1] 39.56 > transform(table(CI))
> min(data_2) CI Freq
[1] 10.06 1 [10,15) 46
> bin=seq(10,40,by=5) 2 [15,20) 47
> bin 3 [20,25) 50
[1] 10 15 20 25 30 35 40 4 [25,30) 44
> CI=cut(data_2,bin,right=FALSE) 5 [30,35) 57
> print(CI) 6 [35,40) 56
[1] [30,35) [35,40) [30,35) [25,30) [35,4
0) [20,25) [15,20) [10,15) [10,15)
[10] [35,40) [15,20) [10,15) [20,25) [25,3
0) [35,40) [35,40) [20,25) [30,35) Aim : Construction of Histogram using given Frequency
[19] [20,25) [25,30) [30,35) [30,35) [20,2 Distribution
5) [20,25) [20,25) [35,40) [15,20)
[28] [30,35) [35,40) [10,15) [25,30) [10,1 PROBLEM 3
5) [25,30) [30,35) [25,30) [20,25)
[37] [30,35) [25,30) [30,35) [20,25) [30,3 3.A group of 400 patients were randomly given five types of
5) [20,25) [15,20) [25,30) [30,35) medicines in a clinical trial. The
[46] [30,35) [35,40) [25,30) [35,40) [35,4
0) [35,40) [35,40) [20,25) [15,20) five types of medicines are denoted by 1, 2, 3, 4 and 5. The data
[55] [30,35) [15,20) [15,20) [30,35) [15,2 on who got which medicine
0) [30,35) [35,40) [10,15) [25,30) is as follows and stored in a data vector as medicine.
[64] [20,25) [35,40) [20,25) [25,30) [30,3
5) [25,30) [35,40) [10,15) [20,25) 5, 5, 1, 2, 5, 4, 5, 1, 5, 4, 4, 5, 4, 5, 4, 5, 5, 3, 4, 1, 4, 3, 4, 1, 5, 1,
[73] [35,40) [25,30) [15,20) [10,15) [30,3 5, 5, 5, 5, 1, 3, 1, 4, 4, 5, 5, 3,
5) [35,40) [20,25) [30,35) [25,30)
[82] [15,20) [15,20) [30,35) [35,40) [35,4 3, 1, 3, 3, 1, 5, 4, 2, 3, 4, 2, 2, 5, 3, 3, 5, 2, 2, 4, 3, 1, 4, 3, 4, 3, 5,
0) [20,25) [10,15) [25,30) [25,30) 1, 2, 4, 4, 1, 1, 5, 4, 4, 2, 1, 4,
[91] [20,25) [20,25) [35,40) [35,40) [35,4 4, 2, 5, 3, 2, 1, 4, 3, 4, 2, 2, 2, 2, 5, 4, 1, 4, 5, 3, 3, 2, 5, 3, 2, 4, 2,
0) [20,25) [30,35) [15,20) [20,25) 3, 1, 3, 1, 1, 1, 5, 4, 5, 3, 3, 3,
[100] [20,25) [30,35) [35,40) [10,15) [20,2 3, 4, 1, 4, 2, 5, 1, 1, 5, 4, 4, 4, 3, 4, 5, 5, 5, 3, 4, 1, 3, 5, 5, 4, 1, 5,
5) [15,20) [25,30) [30,35) [15,20) 1, 5, 3, 3, 2, 5, 3, 2, 2, 3, 5, 5,
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

2, 3, 2, 4, 3, 5, 4, 1, 5, 3, 5, 2, 5, 5, 5, 1, 3, 2, 5, 3, 5, 1, 3, 4, 3, 1, [13] [4,5) [5,6) [4,5) [5,6) [5,6) [3,4) [

5, 5, 2, 4, 1, 5, 4, 5, 3, 1, 1, 5, 4,5) [1,2) [4,5) [3,4) [4,5) [1,2)
3, 5, 5, 5, 4, 3, 1, 5, 1, 2, 3, 5, 5, 3, 4, 2, 2, 5, 1, 5, 5, 4, 4, 3, 1, 3, [25] [5,6) [1,2) [5,6) [5,6) [5,6) [5,6) [
1,2) [3,4) [1,2) [4,5) [4,5) [5,6)
1, 2, 5, 1, 1, 3, 3, 5, 1, 3, 3, 3, [37] [5,6) [3,4) [3,4) [1,2) [3,4) [3,4) [
1, 1, 3, 1, 3 , 5, 2, 3, 2, 2, 4, 4, 4, 4, 3, 2, 4, 3, 1, 3, 2, 3, 1, 5, 4, 3, 1,2) [5,6) [4,5) [2,3) [3,4) [4,5)
5, 2, 5, 5, 3, 5, 5, 2, 5, 5, 4, 5, [49] [2,3) [2,3) [5,6) [3,4) [3,4) [5,6) [
1, 1, 3, 5, 5, 2, 4, 5, 3, 1, 2, 3, 1, 1, 5, 4, 5, 5, 1, 5, 4, 3, 1, 5, 3, 1, 2,3) [2,3) [4,5) [3,4) [1,2) [4,5)
3, 5, 4, 4, 2, 2, 1, 1, 1, 3, 1, 5, [61] [3,4) [4,5) [3,4) [5,6) [1,2) [2,3) [
3, 2, 3, 4, 2, 2, 2, 3, 2, 5, 3, 3, 2, 1, 2, 5, 4, 5, 2, 4, 5, 1, 1, 4, 1, 4, 4,5) [4,5) [1,2) [1,2) [5,6) [4,5)
1, 3, 4, 4, 2, 5, 3, 5, 5, 3, 3, 3, [73] [4,5) [2,3) [1,2) [4,5) [4,5) [2,3) [
5,6) [3,4) [2,3) [1,2) [4,5) [3,4)
2, 5, 1, 5, 2, 5, 2, 4, 4, 3, 1, 3, 1, 1, 4, 2, 3, 3, 3, 5, 2, 1, 3, 1, 5, 1, [85] [4,5) [2,3) [2,3) [2,3) [2,3) [5,6) [
1, 3, 4, 5, 4, 5, 4, 3, 4, 5, 4, 5, 4,5) [1,2) [4,5) [5,6) [3,4) [3,4)
3, 4, 4, 2, 3, 1, 4, 5, 2, 2, 4, 2, 3, 4, 5, 2, 5, 5, 3, 4 [97] [2,3) [5,6) [3,4) [2,3) [4,5) [2,3) [
3,4) [1,2) [3,4) [1,2) [1,2) [1,2)
> #construction of Histogram [109] [5,6) [4,5) [5,6) [3,4) [3,4) [3,4) [
> #frequency distribution 3,4) [4,5) [1,2) [4,5) [2,3) [5,6)
> data_3=c(5, 5, 1, 2, 5, 4, 5, 1, 5, 4, 4, [121] [1,2) [1,2) [5,6) [4,5) [4,5) [4,5) [
5, 4, 5, 4, 5, 5, 3, 4, 1, 4, 3, 4, 1, 5, 1 3,4) [4,5) [5,6) [5,6) [5,6) [3,4)
, 5, 5, 5, 5, 1, 3, 1, 4, 4, 5, 5, 3, 3, 1, [133] [4,5) [1,2) [3,4) [5,6) [5,6) [4,5) [
3, 3, 1, 5, 4, 2, 3, 4, 2, 2, 5, 3, 3, 5, 2 1,2) [5,6) [1,2) [5,6) [3,4) [3,4)
, 2, 4, 3, 1, 4, 3, 4, 3, 5, 1, 2, 4, 4, 1, [145] [2,3) [5,6) [3,4) [2,3) [2,3) [3,4) [
1, 5, 4, 4, 2, 1, 4, 4, 2, 5, 3, 2, 1, 4, 3 5,6) [5,6) [2,3) [3,4) [2,3) [4,5)
, 4, 2, 2, 2, 2, 5, 4, 1, 4, 5, 3, 3, 2, 5, [157] [3,4) [5,6) [4,5) [1,2) [5,6) [3,4) [
3, 2, 4, 2, 3, 1, 3, 1, 1, 1, 5, 4, 5, 3, 3 5,6) [2,3) [5,6) [5,6) [5,6) [1,2)
, 3, 3, 4, 1, 4, 2, 5, 1, 1, 5, 4, 4, 4, 3, [169] [3,4) [2,3) [5,6) [3,4) [5,6) [1,2) [
4, 5, 5, 5, 3, 4, 1, 3, 5, 5, 4, 1, 5, 1, 5 3,4) [4,5) [3,4) [1,2) [5,6) [5,6)
, 3, 3, 2, 5, 3, 2, 2, 3, 5, 5, 2, 3, 2, 4, [181] [2,3) [4,5) [1,2) [5,6) [4,5) [5,6) [
3, 5, 4, 1, 5, 3, 5, 2, 5, 5, 5, 1, 3, 2, 5 3,4) [1,2) [1,2) [5,6) [3,4) [5,6)
, 3, 5, 1, 3, 4, 3, 1, 5, 5, 2, 4, 1, 5, 4, [193] [5,6) [5,6) [4,5) [3,4) [1,2) [5,6) [
5, 3, 1, 1, 5, 3, 5, 5, 5, 4, 3, 1, 5, 1, 2 1,2) [2,3) [3,4) [5,6) [5,6) [3,4)
, 3, 5, 5, 3, 4, 2, 2, 5, 1, 5, 5, 4, 4, 3, [205] [4,5) [2,3) [2,3) [5,6) [1,2) [5,6) [
1, 3, 1, 2, 5, 1, 1, 3, 3, 5, 1, 3, 3, 3, 1 5,6) [4,5) [4,5) [3,4) [1,2) [3,4)
, 1, 3, 1, 3 , 5, 2, 3, 2, 2, 4, 4, 4, 4, 3 [217] [1,2) [2,3) [5,6) [1,2) [1,2) [3,4) [
, 2, 4, 3, 1, 3, 2, 3, 1, 5, 4, 3, 5, 2, 5, 3,4) [5,6) [1,2) [3,4) [3,4) [3,4)
5, 3, 5, 5, 2, 5, 5, 4, 5, 1, 1, 3, 5, 5, 2 [229] [1,2) [1,2) [3,4) [1,2) [3,4) [5,6) [
, 4, 5, 3, 1, 2, 3, 1, 1, 5, 4, 5, 5, 1, 5, 2,3) [3,4) [2,3) [2,3) [4,5) [4,5)
4, 3, 1, 5, 3, 1, 3, 5, 4, 4, 2, 2, 1, 1, 1 [241] [4,5) [4,5) [3,4) [2,3) [4,5) [3,4) [
, 3, 1, 5, 3, 2, 3, 4, 2, 2, 2, 3, 2, 5, 3, 1,2) [3,4) [2,3) [3,4) [1,2) [5,6)
3, 2, 1, 2, 5, 4, 5, 2, 4, 5, 1, 1, 4, 1, 4 [253] [4,5) [3,4) [5,6) [2,3) [5,6) [5,6) [
, 1, 3, 4, 4, 2, 5, 3, 5, 5, 3, 3, 3, 2, 5, 3,4) [5,6) [5,6) [2,3) [5,6) [5,6)
1, 5, 2, 5, 2, 4, 4, 3, 1, 3, 1, 1, 4, 2, 3 [265] [4,5) [5,6) [1,2) [1,2) [3,4) [5,6) [
, 3, 3, 5, 2, 1, 3, 1, 5, 1, 1, 3, 4, 5, 4, 5,6) [2,3) [4,5) [5,6) [3,4) [1,2)
5, 4, 3, 4, 5, 4, 5, 3, 4, 4, 2, 3, 1, 4, 5 [277] [2,3) [3,4) [1,2) [1,2) [5,6) [4,5) [
, 2, 2, 4, 2, 3, 4, 5, 2, 5, 5, 3, 4 5,6) [5,6) [1,2) [5,6) [4,5) [3,4)
+ ) [289] [1,2) [5,6) [3,4) [1,2) [3,4) [5,6) [
> data_3 4,5) [4,5) [2,3) [2,3) [1,2) [1,2)
[1] 5 5 1 2 5 4 5 1 5 4 4 5 4 5 4 5 5 3 4 [301] [1,2) [3,4) [1,2) [5,6) [3,4) [2,3) [
1 4 3 4 1 5 1 5 5 5 5 1 3 1 4 4 5 3,4) [4,5) [2,3) [2,3) [2,3) [3,4)
[37] 5 3 3 1 3 3 1 5 4 2 3 4 2 2 5 3 3 5 2 [313] [2,3) [5,6) [3,4) [3,4) [2,3) [1,2) [
2 4 3 1 4 3 4 3 5 1 2 4 4 1 1 5 4 2,3) [5,6) [4,5) [5,6) [2,3) [4,5)
[73] 4 2 1 4 4 2 5 3 2 1 4 3 4 2 2 2 2 5 4 [325] [5,6) [1,2) [1,2) [4,5) [1,2) [4,5) [
1 4 5 3 3 2 5 3 2 4 2 3 1 3 1 1 1 1,2) [3,4) [4,5) [4,5) [2,3) [5,6)
[109] 5 4 5 3 3 3 3 4 1 4 2 5 1 1 5 4 4 4 3 [337] [3,4) [5,6) [5,6) [3,4) [3,4) [3,4) [
4 5 5 5 3 4 1 3 5 5 4 1 5 1 5 3 3 2,3) [5,6) [1,2) [5,6) [2,3) [5,6)
[145] 2 5 3 2 2 3 5 5 2 3 2 4 3 5 4 1 5 3 5 [349] [2,3) [4,5) [4,5) [3,4) [1,2) [3,4) [
2 5 5 5 1 3 2 5 3 5 1 3 4 3 1 5 5 1,2) [1,2) [4,5) [2,3) [3,4) [3,4)
[181] 2 4 1 5 4 5 3 1 1 5 3 5 5 5 4 3 1 5 1 [361] [3,4) [5,6) [2,3) [1,2) [3,4) [1,2) [
2 3 5 5 3 4 2 2 5 1 5 5 4 4 3 1 3 5,6) [1,2) [1,2) [3,4) [4,5) [5,6)
[217] 1 2 5 1 1 3 3 5 1 3 3 3 1 1 3 1 3 5 2 [373] [4,5) [5,6) [4,5) [3,4) [4,5) [5,6) [
3 2 2 4 4 4 4 3 2 4 3 1 3 2 3 1 5 4,5) [5,6) [3,4) [4,5) [4,5) [2,3)
[253] 4 3 5 2 5 5 3 5 5 2 5 5 4 5 1 1 3 5 5 [385] [3,4) [1,2) [4,5) [5,6) [2,3) [2,3) [
2 4 5 3 1 2 3 1 1 5 4 5 5 1 5 4 3 4,5) [2,3) [3,4) [4,5) [5,6) [2,3)
[289] 1 5 3 1 3 5 4 4 2 2 1 1 1 3 1 5 3 2 3 [397] [5,6) [5,6) [3,4) [4,5)
4 2 2 2 3 2 5 3 3 2 1 2 5 4 5 2 4 Levels: [1,2) [2,3) [3,4) [4,5) [5,6)
[325] 5 1 1 4 1 4 1 3 4 4 2 5 3 5 5 3 3 3 2 > table(CI)
5 1 5 2 5 2 4 4 3 1 3 1 1 4 2 3 3 CI
[361] 3 5 2 1 3 1 5 1 1 3 4 5 4 5 4 3 4 5 4 [1,2) [2,3) [3,4) [4,5) [5,6)
5 3 4 4 2 3 1 4 5 2 2 4 2 3 4 5 2 72 60 88 77 103
[397] 5 5 3 4 > transform(table(CI))
> length(data_3) CI Freq
[1] 400 1 [1,2) 72
> range(data_3) 2 [2,3) 60
[1] 1 5 3 [3,4) 88
> max(data_3) 4 [4,5) 77
[1] 5 5 [5,6) 103
> min(data_3) > #Histogram for grouped data
[1] 1 > h=hist(table(CI),
> bin=seq(1,6,by=1) + main="Histogram of grouped data",c
> CI=cut(data_3,bin,right=FALSE) ol=c("red","blue","yellow","green","pink"),
> print(CI) xlab="CI",ylab="Frequency")
[1] [5,6) [5,6) [1,2) [2,3) [5,6) [4,5) [ > print(h)
5,6) [1,2) [5,6) [4,5) [4,5) [5,6) $breaks
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

[1] 60 70 80 90 100 110 32.84, 48.94, 42.28, 42.30, 19.99, 39.86, 2

0.90, 13.41, 21.55, 25.28, 43.05, 36.88, 48
$counts .75,
[1] 1 2 1 0 1 5.90, 41.80, 23.08, 42.67, 28.92, 48.12, 47
.78, 14.91, 37.24, 4.47, 45.11, 7.54, 28.24
$density , 30.42,
[1] 0.02 0.04 0.02 0.00 0.02 7.52, 25.96, 18.99, 1.16, 3.35, 44.22, 41.3
5, 21.24, 46.16, 24.39, 24.27, 33.23, 9.00,
$mids 5.66,
[1] 65 75 85 95 105 43.21, 12.75, 28.21, 42.62, 18.13, 48.81, 4
3.60, 37.95
$xname
[1] "table(CI)" > #construction of Histogram
> #frequency distribution
$equidist > data_4=c(6.38, 37.96, 15.93, 36.47, 12.38
[1] TRUE , 20.28, 25.89, 47.06, 3.84, 15.93, 12.81,
19.87, 38.39, 43.37, 34.28, 34.16, 9.09, 40
attr(,"class") .34, 35.89, 46.51, 1.37, 30.22, 18.97, 37.3
[1] "histogram" 6, 38.34, 13.78, 13.49, 34.26, 24.79, 19.55
> text(h$mids,h$counts,labels=h$counts,adj= , 3.72, 45.05, 40.28, 24.57, 2.57, 26.09, 1
c(0.5,-0.5)) 9.28, 25.43, 20.56, 2.03, 26.69, 8.86, 11.0
5, 48.79, 48.35, 38.24, 4.74, 26.28, 30.41,
22.41, 1.08, 22.34, 25.55, 33.81, 35.05, 39
PROBLEM 4 .34, 7.81, 9.00, 38.22, 22.74, 31.85, 6.12,
41.94, 17.36, 10.78, 35.03, 9.13, 4.62, 2.8
4.A group of 300 students were awarded foll 7, 42.45, 19.30, 44.15, 5.43, 25.30, 37.96,
owing marks in an examination which are 30.69, 26.89, 45.60, 49.30, 14.71, 7.05, 9.
stored in a data vector as marks. 54, 44.19, 7.11, 15.65, 9.07, 4.56, 12.68,
36.12, 32.61, 4.72, 9.46, 8.14, 20.20, 12.3
6.38, 37.96, 15.93, 36.47, 12.38, 20.28, 25 6, 28.51, 29.59, 5.84, 8.79, 46.18, 43.11,
.89, 47.06, 3.84, 15.93, 12.81, 19.87, 38.3 45.45, 6.65, 2.74, 29.70, 16.39, 28.29, 18.
9, 43.37, 37, 8.02, 28.79, 17.37, 6.90, 13.54, 18.32,
34.28, 34.16, 9.09, 40.34, 35.89, 46.51, 1. 41.73, 39.38, 47.07, 42.12, 8.30, 29.94, 41
37, 30.22, 18.97, 37.36, 38.34, 13.78, 13.4 .37, 31.96, 24.03, 13.68, 2.20, 17.11, 12.0
9, 34.26, 2, 43.99, 34.21, 26.77, 28.33, 13.13, 1.36,
24.79, 19.55, 3.72, 45.05, 40.28, 24.57, 2. 47.50, 36.24, 14.69, 37.45, 43.67, 19.64, 3
57, 26.09, 19.28, 25.43, 20.56, 2.03, 26.69 6.25, 12.74, 32.74, 48.81, 19.52, 23.74, 40
, 8.86, .80, 25.23, 3.47, 7.40, 8.91, 5.38, 20.7, 4
11.05, 48.79, 48.35, 38.24, 4.74, 26.28, 30 .13, 28.54, 17.49, 27.49, 45.75, 19.96, 48.
.41, 22.41, 1.08, 22.34, 25.55, 33.81, 35.0 05, 19.85, 47.14, 34.35, 45.23, 13.44, 20.9
5, 39.34, 0, 1.70, 6.41, 25.58, 19.20, 40.49, 1.39, 4
7.81, 9.00, 38.22, 22.74, 31.85, 6.12, 41.9 1.99, 19.47, 19.88, 47.62, 24.31, 28.05, 46
4, 17.36, 10.78, 35.03, 9.13, 4.62, 2.87, 4 .80, 43.31, 13.74, 34.70, 22.95, 11.68, 34.
2.45, 63, 48.01, 13.71, 23.97, 16.75, 9.07, 36.02
19.30, 44.15, 5.43, 25.30, 37.96, 30.69, 26 , 26.88, 12.50, 4.16, 34.11, 40.50, 6.66, 3
.89, 45.60, 49.30, 14.71, 7.05, 9.54, 44.19 4.91, 2.07, 18.71, 36.88, 16.32, 22.91, 41.
, 7.11, 45, 17.26, 8.06, 15.75, 8.97, 42.13, 33.55,
15.65, 9.07, 4.56, 12.68, 36.12, 32.61, 4.7 7.80, 16.97, 41.74, 41.30, 8.32, 21.64, 22.
2, 9.46, 8.14, 20.20, 12.36, 28.51, 29.59, 81, 44.31, 21.33, 34.80, 36.13, 1.61, 2.85,
5.84, 8.79, 5.45, 20.54, 45.11, 22.80, 38.00, 35.86, 9.
46.18, 43.11, 45.45, 6.65, 2.74, 29.70, 16. 17, 43.59, 5.37, 8.99, 42.62, 31.78, 11.21,
39, 28.29, 18.37, 8.02, 28.79, 17.37, 6.90, 33.97, 48.25, 44.21, 48.13, 23.77, 4.57, 43
13.54, .84, 10.74, 27.19, 6.17, 19.82, 37.64, 35.0
18.32, 41.73, 39.38, 47.07, 42.12, 8.30, 29 9, 5.82, 30.97, 2.03, 32.84, 48.94, 42.28,
.94, 41.37, 31.96, 24.03, 13.68, 2.20, 17.1 42.30, 19.99, 39.86, 20.90, 13.41, 21.55, 2
1, 12.02, 5.28, 43.05, 36.88, 48.75, 5.90, 41.80, 23.
43.99, 34.21, 26.77, 28.33, 13.13, 1.36, 47 08, 42.67, 28.92, 48.12, 47.78, 14.91, 37.2
.50, 36.24, 14.69, 37.45, 43.67, 19.64, 36. 4, 4.47, 45.11, 7.54, 28.24, 30.42, 7.52, 2
25, 5.96, 18.99, 1.16, 3.35, 44.22, 41.35, 21.2
12.74, 32.74, 48.81, 19.52, 23.74, 40.80, 2 4, 46.16, 24.39, 24.27, 33.23, 9.00, 5.66,
5.23, 3.47, 7.40, 8.91, 5.38, 20.7, 4.13, 2 43.21, 12.75, 28.21, 42.62, 18.13, 48.81, 4
8.54, 3.60, 37.95
17.49, 27.49, 45.75, 19.96, 48.05, 19.85, 4 + )
7.14, 34.35, 45.23, 13.44, 20.90, 1.70, 6.4 > data_4
1, 25.58, [1] 6.38 37.96 15.93 36.47 12.38 20.28 2
19.20, 40.49, 1.39, 41.99, 19.47, 19.88, 47 5.89 47.06 3.84 15.93 12.81 19.87
.62, 24.31, 28.05, 46.80, 43.31, 13.74, 34. [13] 38.39 43.37 34.28 34.16 9.09 40.34 3
70, 5.89 46.51 1.37 30.22 18.97 37.36
22.95, 11.68, 34.63, 48.01, 13.71, 23.97, 1 [25] 38.34 13.78 13.49 34.26 24.79 19.55
6.75, 9.07, 36.02, 26.88, 12.50, 4.16, 34.1 3.72 45.05 40.28 24.57 2.57 26.09
1, 40.50, [37] 19.28 25.43 20.56 2.03 26.69 8.86 1
6.66, 34.91, 2.07, 18.71, 36.88, 16.32, 22. 1.05 48.79 48.35 38.24 4.74 26.28
91, 41.45, 17.26, 8.06, 15.75, 8.97, 42.13, [49] 30.41 22.41 1.08 22.34 25.55 33.81 3
33.55, 5.05 39.34 7.81 9.00 38.22 22.74
7.80, 16.97, 41.74, 41.30, 8.32, 21.64, 22. [61] 31.85 6.12 41.94 17.36 10.78 35.03
81, 44.31, 21.33, 34.80, 36.13, 1.61, 2.85, 9.13 4.62 2.87 42.45 19.30 44.15
5.45, [73] 5.43 25.30 37.96 30.69 26.89 45.60 4
20.54, 45.11, 22.80, 38.00, 35.86, 9.17, 43 9.30 14.71 7.05 9.54 44.19 7.11
.59, 5.37, 8.99, 42.62, 31.78, 11.21, 33.97 [85] 15.65 9.07 4.56 12.68 36.12 32.61
, 48.25, 4.72 9.46 8.14 20.20 12.36 28.51
44.21, 48.13, 23.77, 4.57, 43.84, 10.74, 27 [97] 29.59 5.84 8.79 46.18 43.11 45.45
.19, 6.17, 19.82, 37.64, 35.09, 5.82, 30.97 6.65 2.74 29.70 16.39 28.29 18.37
, 2.03, [109] 8.02 28.79 17.37 6.90 13.54 18.32 4
1.73 39.38 47.07 42.12 8.30 29.94
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

[121] 41.37 31.96 24.03 13.68 2.20 17.11 1 [181] [31,36) [21,26) [11,16) [31,36) <NA>
2.02 43.99 34.21 26.77 28.33 13.13 [11,16) [21,26) [16,21) [6,11)
[133] 1.36 47.50 36.24 14.69 37.45 43.67 1 [190] [36,41) [26,31) [11,16) [1,6) [31,3
9.64 36.25 12.74 32.74 48.81 19.52 6) [36,41) [6,11) [31,36) [1,6)
[145] 23.74 40.80 25.23 3.47 7.40 8.91 [199] [16,21) [36,41) [16,21) [21,26) [41,4
5.38 20.70 4.13 28.54 17.49 27.49 6) [16,21) [6,11) [11,16) [6,11)
[157] 45.75 19.96 48.05 19.85 47.14 34.35 4 [208] [41,46) [31,36) [6,11) [16,21) [41,4
5.23 13.44 20.90 1.70 6.41 25.58 6) [41,46) [6,11) [21,26) [21,26)
[169] 19.20 40.49 1.39 41.99 19.47 19.88 4 [217] [41,46) [21,26) [31,36) [36,41) [1,6)
7.62 24.31 28.05 46.80 43.31 13.74 [1,6) [1,6) [16,21) [41,46)
[181] 34.70 22.95 11.68 34.63 48.01 13.71 2 [226] [21,26) [36,41) [31,36) [6,11) [41,4
3.97 16.75 9.07 36.02 26.88 12.50 6) [1,6) [6,11) [41,46) [31,36)
[193] 4.16 34.11 40.50 6.66 34.91 2.07 1 [235] [11,16) [31,36) <NA> [41,46) <NA>
8.71 36.88 16.32 22.91 41.45 17.26 [21,26) [1,6) [41,46) [6,11)
[205] 8.06 15.75 8.97 42.13 33.55 7.80 1 [244] [26,31) [6,11) [16,21) [36,41) [31,3
6.97 41.74 41.30 8.32 21.64 22.81 6) [1,6) [26,31) [1,6) [31,36)
[217] 44.31 21.33 34.80 36.13 1.61 2.85 [253] <NA> [41,46) [41,46) [16,21) [36,4
5.45 20.54 45.11 22.80 38.00 35.86 1) [16,21) [11,16) [21,26) [21,26)
[229] 9.17 43.59 5.37 8.99 42.62 31.78 1 [262] [41,46) [36,41) <NA> [1,6) [41,4
1.21 33.97 48.25 44.21 48.13 23.77 6) [21,26) [41,46) [26,31) <NA>
[241] 4.57 43.84 10.74 27.19 6.17 19.82 3 [271] <NA> [11,16) [36,41) [1,6) [41,4
7.64 35.09 5.82 30.97 2.03 32.84 6) [6,11) [26,31) [26,31) [6,11)
[253] 48.94 42.28 42.30 19.99 39.86 20.90 1 [280] [21,26) [16,21) [1,6) [1,6) [41,4
3.41 21.55 25.28 43.05 36.88 48.75 6) [41,46) [21,26) <NA> [21,26)
[265] 5.90 41.80 23.08 42.67 28.92 48.12 4 [289] [21,26) [31,36) [6,11) [1,6) [41,4
7.78 14.91 37.24 4.47 45.11 7.54 6) [11,16) [26,31) [41,46) [16,21)
[277] 28.24 30.42 7.52 25.96 18.99 1.16 [298] <NA> [41,46) [36,41)
3.35 44.22 41.35 21.24 46.16 24.39 9 Levels: [1,6) [6,11) [11,16) [16,21) [21,
[289] 24.27 33.23 9.00 5.66 43.21 12.75 2 26) [26,31) [31,36) ... [41,46)
8.21 42.62 18.13 48.81 43.60 37.95 > table(CI)
> length(data_4) CI
[1] 300 [1,6) [6,11) [11,16) [16,21) [21,26) [26
> range(data_4) ,31) [31,36) [36,41) [41,46)
[1] 1.08 49.30 35 35 27 35 29
> max(data_4) 25 25 28 39
[1] 49.3 > transform(table(CI))
> min(data_4) CI Freq
[1] 1.08 1 [1,6) 35
> bin=seq(1,50,by=5) 2 [6,11) 35
> print(bin) 3 [11,16) 27
[1] 1 6 11 16 21 26 31 36 41 46 4 [16,21) 35
> CI=cut(data_4,bin,right=FALSE) 5 [21,26) 29
> print(CI) 6 [26,31) 25
[1] [6,11) [36,41) [11,16) [36,41) [11,1 7 [31,36) 25
6) [16,21) [21,26) <NA> [1,6) 8 [36,41) 28
[10] [11,16) [11,16) [16,21) [36,41) [41,4 9 [41,46) 39
6) [31,36) [31,36) [6,11) [36,41) > #Histogram for grouped data
[19] [31,36) <NA> [1,6) [26,31) [16,2 > h=hist(table(CI),
1) [36,41) [36,41) [11,16) [11,16) + main="Histogram of grouped data",c
[28] [31,36) [21,26) [16,21) [1,6) [41,4 ol=c("red","blue","yellow","green","pink","
6) [36,41) [21,26) [1,6) [26,31) brown","orange"),xlab="CI",ylab="Frequency"
[37] [16,21) [21,26) [16,21) [1,6) [26,3 )
1) [6,11) [11,16) <NA> <NA> > print(h)
[46] [36,41) [1,6) [26,31) [26,31) [21,2 $breaks
6) [1,6) [21,26) [21,26) [31,36) [1] 24 26 28 30 32 34 36 38 40
[55] [31,36) [36,41) [6,11) [6,11) [36,4
1) [21,26) [31,36) [6,11) [41,46) $counts
[64] [16,21) [6,11) [31,36) [6,11) [1,6) [1] 2 2 1 0 0 3 0 1
[1,6) [41,46) [16,21) [41,46)
[73] [1,6) [21,26) [36,41) [26,31) [26,3 $density
1) [41,46) <NA> [11,16) [6,11) [1] 0.11111111 0.11111111 0.05555556 0.0000
[82] [6,11) [41,46) [6,11) [11,16) [6,11 0000 0.00000000 0.16666667
) [1,6) [11,16) [36,41) [31,36) [7] 0.00000000 0.05555556
[91] [1,6) [6,11) [6,11) [16,21) [11,1
6) [26,31) [26,31) [1,6) [6,11) $mids
[100] <NA> [41,46) [41,46) [6,11) [1,6) [1] 25 27 29 31 33 35 37 39
[26,31) [16,21) [26,31) [16,21)
[109] [6,11) [26,31) [16,21) [6,11) [11,1 $xname
6) [16,21) [41,46) [36,41) <NA> [1] "table(CI)"
[118] [41,46) [6,11) [26,31) [41,46) [31,3
6) [21,26) [11,16) [1,6) [16,21) $equidist
[127] [11,16) [41,46) [31,36) [26,31) [26,3 [1] TRUE
1) [11,16) [1,6) <NA> [36,41)
[136] [11,16) [36,41) [41,46) [16,21) [36,4 attr(,"class")
1) [11,16) [31,36) <NA> [16,21) [1] "histogram"
[145] [21,26) [36,41) [21,26) [1,6) [6,11 > text(h$mids,h$counts,labels=h$counts,adj=
) [6,11) [1,6) [16,21) [1,6) c(0.5,-0.5))
[154] [26,31) [16,21) [26,31) [41,46) [16,2
1) <NA> [16,21) <NA> [31,36)
[163] [41,46) [11,16) [16,21) [1,6) [6,11
) [21,26) [16,21) [36,41) [1,6)
[172] [41,46) [16,21) [16,21) <NA> [21,2
6) [26,31) <NA> [41,46) [11,16)
Stochastic Process and Queueing Theory Lab N. Potharaju
22MTC17 160123771301
Date : 27-01-2025

PROBLEM 3 – OUTPUT :

PROBLEM 4 – OUTPUT :