#import Your data
data <- read.csv("R/auto-mpg.csv")

#Convert into Data frame
datadf <- as.data.frame(data)

#A query about the raw data values
head(datadf)

#Count the number of missing data
sumNA <- sum(is.na(datadf))
paste("The number of missing values is: ", sumNA)

​

#Check If there is Missing Value 
if(sumNA == 0){
  
  #There is No Missing Value
  paste("Your dataset is complete!")
} else{
  index <- unique (unlist (lapply (datadf, function (x) which (is.na (x)))))
  
  #There is Missing Value
  paste("Missing value at index: ")
  index
}