##Importing the hospital data from xl format to R Console
library(readxl)
Hospital_Data_Analysis_Using_T_Test <- read_excel("Hospital Data Analysis Using T-Test.xlsx")
## New names:
## • `` -> `...2`
## • `` -> `...3`
## • `` -> `...4`
View(Hospital_Data_Analysis_Using_T_Test)
##Exploring my dataset
head(Hospital_Data_Analysis_Using_T_Test)##will display the fisrt six values of the dataset
## # A tibble: 6 × 4
## `DATASET IN HOSPITALS` ...2 ...3 ...4
## <chr> <chr> <chr> <chr>
## 1 Assuming we have the following hospital data <NA> <NA> <NA>
## 2 Patients Group Bp_Before Bp_After
## 3 1 Treatment 160 140
## 4 2 Treatment 155 135
## 5 3 Control 162 158
## 6 4 Control 159 157
tail(Hospital_Data_Analysis_Using_T_Test, 3)##Will display the last three values of the dataset
## # A tibble: 3 × 4
## `DATASET IN HOSPITALS` ...2 ...3 ...4
## <chr> <chr> <chr> <chr>
## 1 8 Control 150 120
## 2 9 Control 120 140
## 3 10 Treatment 130 170
summary(Hospital_Data_Analysis_Using_T_Test)##will show the summary of my dataset
## DATASET IN HOSPITALS ...2 ...3 ...4
## Length:12 Length:12 Length:12 Length:12
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
dim(Hospital_Data_Analysis_Using_T_Test)##Shows the rows and column numbers
## [1] 12 4
str(Hospital_Data_Analysis_Using_T_Test)##Will display the features of the dataset.
## tibble [12 × 4] (S3: tbl_df/tbl/data.frame)
## $ DATASET IN HOSPITALS: chr [1:12] "Assuming we have the following hospital data" "Patients" "1" "2" ...
## $ ...2 : chr [1:12] NA "Group" "Treatment" "Treatment" ...
## $ ...3 : chr [1:12] NA "Bp_Before" "160" "155" ...
## $ ...4 : chr [1:12] NA "Bp_After" "140" "135" ...