markdown

supermarket<- data.frame(
  billId = 501:506,
  customerName = c('aman','riya','karan','neha','rohit','simran'),
  gender= c('male','female','male','female','male','male'),
  menbership= c('Gold','Silver','Gold','None','Silver','Gold'),
  cat=c('grocery','ele','clothing','grocery','ele','clothing'),
  Quantity=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=c(
  'Home',
  'Store',
  'Home',
  'Store',
  'Home',
  'Home')
)

supermarket$GrossRevenue <- supermarket$Quantity * supermarket$SellingPrice

supermarket

##   billId customerName gender menbership      cat Quantity CostPrice
## 1    501         aman   male       Gold  grocery       10        50
## 2    502         riya female     Silver      ele        1     20000
## 3    503        karan   male       Gold clothing        3       800
## 4    504         neha female       None  grocery        8        60
## 5    505        rohit   male     Silver      ele        2     18000
## 6    506       simran   male       Gold clothing        5       700
##   SellingPrice Discount DeliveryType GrossRevenue
## 1           70      100         Home          700
## 2        25000     2000        Store        25000
## 3         1000      150         Home         3000
## 4           80       50        Store          640
## 5        22000      500         Home        44000
## 6          900      300         Home         4500

supermarket$total<- supermarket$Quantity*supermarket$CostPrice

supermarket$netRevenue<- supermarket$GrossRevenue-supermarket$Discount

supermarket$profit<- supermarket$netRevenue- supermarket$total

supermarket

##   billId customerName gender menbership      cat Quantity CostPrice
## 1    501         aman   male       Gold  grocery       10        50
## 2    502         riya female     Silver      ele        1     20000
## 3    503        karan   male       Gold clothing        3       800
## 4    504         neha female       None  grocery        8        60
## 5    505        rohit   male     Silver      ele        2     18000
## 6    506       simran   male       Gold clothing        5       700
##   SellingPrice Discount DeliveryType GrossRevenue total netRevenue profit
## 1           70      100         Home          700   500        600    100
## 2        25000     2000        Store        25000 20000      23000   3000
## 3         1000      150         Home         3000  2400       2850    450
## 4           80       50        Store          640   480        590    110
## 5        22000      500         Home        44000 36000      43500   7500
## 6          900      300         Home         4500  3500       4200    700