Mean mode median:


  dataset <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)  

mean_value <- mean(dataset)  

print(paste("Mean:", mean_value))  

mode_value <- names(which.max(table(dataset)))  

print(paste("Mode:", mode_value))  

median_value <- median(dataset)  

print(paste("Median:", median_value))

Comments

Post a Comment

Popular posts from this blog

Reading and writing files

 numbers <- c(1, 2, 3, 4, 5) write(numbers, file = "numbers.txt") read_numbers <- read.table("numbers.txt") print(read_numbers) data<-data.frame(name=c("john","mary","david"),age=c(25,31, 42)) write.table(data,file="data.csv",sep=",",row.names=FALSE,col.names=TRUE) read_data <- read.csv("data.csv") print(read_data)
Read more