Untitled

library(readr)
Flipkart_Mobiles <- read_csv("C:/Users/aby48/Desktop/Flipkart_Mobiles.csv")

## Rows: 3114 Columns: 8
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (5): Brand, Model, Color, Memory, Storage
## dbl (3): Rating, Selling Price, Original Price
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

View(Flipkart_Mobiles)



summary(Flipkart_Mobiles$Memory)

##    Length     Class      Mode 
##      3114 character character

summary(Flipkart_Mobiles$Storage)

##    Length     Class      Mode 
##      3114 character character

summary(Flipkart_Mobiles$Rating)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##   2.300   4.100   4.300   4.243   4.400   5.000     144

summary(Flipkart_Mobiles$`Selling Price`)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    1000    9990   15000   26437   28999  179900

summary(Flipkart_Mobiles$`Original Price`)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    1000   10030   16890   28333   31500  189999