superMarket <- data.frame(
  BillID =c(501,502,503,504,505,506),
  CustomerName =c("Aman","Riya","Karan","Neha","Rohit","Simran"),
  Gender =factor(c("male","female","male","female","male","femle")),
  Membership =factor(c("Gold","silver","Gold","None","silver","Gold")),
  Catergory=factor(c("Grocery","Electonics","Clothess","Grocery","Electronics","Clothing")),
  Quantinty = c(10,1,3,8,2,5),
  CostPrice =c(50,20000,800,60,18000,700),
  SellingPrice =c(70,25000,1000,80,22000,900),
  Discount =c(100,2000,150,50,500,300),
  DeliveryType =factor(c("Home","Store","Home","Store","Home","Home"))
)
superMarket
##   BillID CustomerName Gender Membership   Catergory Quantinty CostPrice
## 1    501         Aman   male       Gold     Grocery        10        50
## 2    502         Riya female     silver  Electonics         1     20000
## 3    503        Karan   male       Gold    Clothess         3       800
## 4    504         Neha female       None     Grocery         8        60
## 5    505        Rohit   male     silver Electronics         2     18000
## 6    506       Simran  femle       Gold    Clothing         5       700
##   SellingPrice Discount DeliveryType
## 1           70      100         Home
## 2        25000     2000        Store
## 3         1000      150         Home
## 4           80       50        Store
## 5        22000      500         Home
## 6          900      300         Home
str(superMarket)
## 'data.frame':    6 obs. of  10 variables:
##  $ BillID      : num  501 502 503 504 505 506
##  $ CustomerName: chr  "Aman" "Riya" "Karan" "Neha" ...
##  $ Gender      : Factor w/ 3 levels "female","femle",..: 3 1 3 1 3 2
##  $ Membership  : Factor w/ 3 levels "Gold","None",..: 1 3 1 2 3 1
##  $ Catergory   : Factor w/ 5 levels "Clothess","Clothing",..: 5 3 1 5 4 2
##  $ Quantinty   : num  10 1 3 8 2 5
##  $ CostPrice   : num  50 20000 800 60 18000 700
##  $ SellingPrice: num  70 25000 1000 80 22000 900
##  $ Discount    : num  100 2000 150 50 500 300
##  $ DeliveryType: Factor w/ 2 levels "Home","Store": 1 2 1 2 1 1
summary(superMarket)
##      BillID      CustomerName          Gender   Membership       Catergory
##  Min.   :501.0   Length:6           female:2   Gold  :3    Clothess   :1  
##  1st Qu.:502.2   Class :character   femle :1   None  :1    Clothing   :1  
##  Median :503.5   Mode  :character   male  :3   silver:2    Electonics :1  
##  Mean   :503.5                                             Electronics:1  
##  3rd Qu.:504.8                                             Grocery    :2  
##  Max.   :506.0                                                            
##    Quantinty        CostPrice      SellingPrice      Discount      DeliveryType
##  Min.   : 1.000   Min.   :   50   Min.   :   70   Min.   :  50.0   Home :4     
##  1st Qu.: 2.250   1st Qu.:  220   1st Qu.:  285   1st Qu.: 112.5   Store:2     
##  Median : 4.000   Median :  750   Median :  950   Median : 225.0               
##  Mean   : 4.833   Mean   : 6602   Mean   : 8175   Mean   : 516.7               
##  3rd Qu.: 7.250   3rd Qu.:13700   3rd Qu.:16750   3rd Qu.: 450.0               
##  Max.   :10.000   Max.   :20000   Max.   :25000   Max.   :2000.0