superMarket

SuperMarket<-data.frame(
  Bill_Id=c(501,502,503,504,505,506),
  Customer_Name=c("Aman","Riya","Karan","Neha","Rohit","Simran"),
  Gender=factor(c("Male","Female","Male","Female","Male","Femal")),
  MemberShip=factor(c("Gold","Silver","Gold","None","Silver","Gold")),
  Category=factor(c("Grocery","Electronic","Clothing","Grocery","Electronic","Clothing")),
  Quantity= c(10,1,3,8,2,5),
  CostPrice=c(50,2000,800,60,18000,700),
  SellingPrice=c(70,25000,100,80,22000,900),
  Discount=c(100,2000,150,50,500,300),
  DeleveryType= factor(c("Home","Store","Home","Store","Home","Home"))
)
print(SuperMarket)

##   Bill_Id Customer_Name Gender MemberShip   Category Quantity CostPrice
## 1     501          Aman   Male       Gold    Grocery       10        50
## 2     502          Riya Female     Silver Electronic        1      2000
## 3     503         Karan   Male       Gold   Clothing        3       800
## 4     504          Neha Female       None    Grocery        8        60
## 5     505         Rohit   Male     Silver Electronic        2     18000
## 6     506        Simran  Femal       Gold   Clothing        5       700
##   SellingPrice Discount DeleveryType
## 1           70      100         Home
## 2        25000     2000        Store
## 3          100      150         Home
## 4           80       50        Store
## 5        22000      500         Home
## 6          900      300         Home

# Step 2: Add Calculation-Based Columns
 # 1. Add GrossRevenue = Quantity * SellingPrice.
GrossRevenue<-SuperMarket$Quantity * SuperMarket$SellingPrice
SuperMarket<-cbind(SuperMarket, GrossRevenue)
print(GrossRevenue)

## [1]   700 25000   300   640 44000  4500

print(SuperMarket)

##   Bill_Id Customer_Name Gender MemberShip   Category Quantity CostPrice
## 1     501          Aman   Male       Gold    Grocery       10        50
## 2     502          Riya Female     Silver Electronic        1      2000
## 3     503         Karan   Male       Gold   Clothing        3       800
## 4     504          Neha Female       None    Grocery        8        60
## 5     505         Rohit   Male     Silver Electronic        2     18000
## 6     506        Simran  Femal       Gold   Clothing        5       700
##   SellingPrice Discount DeleveryType GrossRevenue
## 1           70      100         Home          700
## 2        25000     2000        Store        25000
## 3          100      150         Home          300
## 4           80       50        Store          640
## 5        22000      500         Home        44000
## 6          900      300         Home         4500