Input:-

#create a data frame

data<- data.frame(
Name = c("SUPRODIP CHAKRABORTY",
"ANUBHAB ROY",
"SOHAN CHAKRAVARTTY",
"BAPAN GHOSH",
"ARITRA SARDAR",
"SATYAM JANA",
"SUDIPTA MANNA",
"SHUVADIP DAS",
" MANAS MONDAL",
" SUBRATA SAHOO",
" PROMIT HORE",
"DEB KUMAR MALLICK",
" RAJDIP BANERJEE",
" PUSPENDU BIKASH SAMANTA",
" SOHAM MONDAL",
" KIRANMAY DOLUI ",
" KINGSHUK KUMAR BAR",
"RITAM DAS",
" SAIBAL BERA",
"BISWAJIT DAS",
" BILASH MONDAL",
"RHITAM BALO",
" ARNAB GHOSH ",
"BARUN ROY",
" DEBARGHA MAJUMDER",
"SUDIPTA BERA",
" MD FIROJ MOLLA",
"SOUMITRA DAS",
"SUROJIT DINDA",
"SUMIT SINGH ",
"SUMAN CHANDRA MANDAL",
" SAYANTIK MONDAL",
" ABHINANDAN GIRI",
"RAKTIM DEY",
"SOHEL MUNSHI",
"SOWHARDHYA GHOSH",
"RANIT SARKAR" ),
Roll_no. = c(301,
302,
303,
304,
306,
307,
308,
 309,
311,
312,
313,
315,
316,
318,
319,
322,
323,
326,
328,
329,
330,
331,
334,
336,
337,
341,
343,
345,
346,
347,
351,
352,
353,
356,
358,
1315,
1327),
First_Sem_Marks = c(8.77,
8.85,
8.31,
8.01,
8.15,
8.55,
NA,
8.66,
8.22,
8.96,
8.66,
NA,
8.36,
8.08,
8.23,
8.08,
8.56,
 8.15,
7.98,
8.65,
7.74,
7.46,
8.92,
8.12,
8.15,
7.85,
7.65,
8.31,
7.98,
NA,
7.89,
8.23,
8.24,
NA,
7.56,
8.26,
NA ),
Total_HS_Marks = c(442,
429 ,
359,
389,
452,
336,
391,
452,
452,
459,
452,
456,
456,
433,
452,
375,
440,
450,
398,
375,
421,
423,
422,
429,
422,
426,
403,
 437,
435,
439,
400,
395,
367,
344,
364,
420,
421),
Math_HS_Marks = c(96,
91,
92,
91,
99,
99,
84,
85,
85,
56,
86,
86,
96,
96,
96,
75,
89,
87,
92,
91,
79,
85,
96,
82,
83,
77,
86,
91,
79,
78,
86,
89,
84,
73,
91,
95,
87),
 Computer_Science_HS_Marks= c(98,
90,
NA,
99,
88,
85,
NA,
100,
100,
85,
96,
96,
96,
96,
100,
NA,
86,
NA,
75,
85,
81,
NA,
NA,
79,
73,
NA,
78,
NA,
89,
81,
79,
84,
83,
80,
NA,
87,
79)
)

#Print the data frame

print(data)

#Summary statistic
summary(data$First_Sem_Marks)
summary(data$Total_HS_Marks)
summary(data$Math_HS_Marks)
summary(data$Computer_Science_HS_Marks)
 Output:-

Roll_no. First_Sem_Marks Total_HS_Marks Math_HS_Marks Computer_Sceince_HS_Marks

Name

1 SUPRODIP CHAKRABORTY 301 8.77 442 96 98

2 ANUBHAB ROY 302 8.85 429 91 90

3 SOHAN CHAKRAVARTTY 303 8.31 359 92 NA

4 BAPAN GHOSH 304 8.01 389 91 99

5 ARITRA SARDAR 306 8.15 452 99 88

6 SATYAM JANA 307 8.55 336 99 85

7 SUDIPTA MANNA 308 NA 391 84 NA

8 SHUVADIP DAS 309 8.66 452 85 100

9 MANAS MONDAL 311 8.22 452 85 100

10 SUBRATA SAHOO 312 8.96 459 56 85

11 PROMIT HORE 313 8.66 452 86 96

12 DEB KUMAR MALLICK 315 NA 456 86 96

13 RAJDIP BANERJEE 316 8.36 456 96 96

 Roll_no. First_Sem_Marks Total_HS_Marks Math_HS_Marks Computer_Sceince_HS_Marks
Name

PUSPENDU BIKASH SA-

14 318 8.08 433 96 96
MANTA

15 SOHAM MONDAL 319 8.23 452 96 100

16 KIRANMAY DOLUI 322 8.08 375 75 NA

17 KINGSHUK KUMAR BAR 323 8.56 440 89 86

18 RITAM DAS 326 8.15 450 87 NA

19 SAIBAL BERA 328 7.98 398 92 75

20 BISWAJIT DAS 329 8.65 375 91 85

21 BILASH MONDAL 330 7.74 421 79 81

22 RHITAM BALO 331 7.46 423 85 NA

23 ARNAB GHOSH 334 8.92 422 96 NA

24 BARUN ROY 336 8.12 429 82 79

25 DEBARGHA MAJUMDER 337 8.15 422 83 73

26 SUDIPTA BERA 341 7.85 426 77 NA

27 MD FIROJ MOLLA 343 7.65 403 86 78

28 SOUMITRA DAS 345 8.31 437 91 NA

 Roll_no. First_Sem_Marks Total_HS_Marks Math_HS_Marks Computer_Sceince_HS_Marks
Name

29 SUROJIT DINDA 346 7.98 435 79 89

30 SUMIT SINGH 347 NA 439 78 81

31 SUMAN CHANDRA MANDAL 351 7.89 400 86 79

32 SAYANTIK MONDAL 352 8.23 395 89 84

33 ABHINANDAN GIRI 353 8.24 367 84 83

34 RAKTIM DEY 356 NA 344 73 80

35 SOHEL MUNSHI 358 7.56 364 91 NA

36 SOWHARDHYA GHOSH 1315 8.26 420 95 87

37 RANIT SARKAR 1327 NA 421 87 79

Mean,Median,Mode :-
#Summary statistic

> summary(data$First_Sem_Marks)
Min. 1st Qu. Median Mean 3rd Qu. Max. NA's
7.460 8.002 8.225 8.237 8.553 8.960 5

> summary(data$Total_HS_Marks)
Min. 1st Qu. Median Mean 3rd Qu. Max.
336.0 395.0 423.0 416.6 442.0 459.0

> summary(data$Math_HS_Marks)
Min. 1st Qu. Median Mean 3rd Qu. Max.
56.00 84.00 87.00 86.84 92.00 99.00

> summary(data$Computer_Science_HS_Marks)
Min. 1st Qu. Median Mean 3rd Qu. Max. NA's
73.00 80.75 85.50 87.43 96.00 100.00 9