Skip to content

Instantly share code, notes, and snippets.

@mmajogn

mmajogn/moda.R

Created February 28, 2015 06:51
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mmajogn/8d9bf4d562eb85dd0fb7 to your computer and use it in GitHub Desktop.
Save mmajogn/8d9bf4d562eb85dd0fb7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
moda.R
#moda#
x<-c(3.0,5.8,5.6,4.8,5.1,3.6,5.5,4.7,5.7,5.0,5.9,5.7,4.4,5.4,4.2,5.3)
sort(x, decreasing=TRUE)
[1] 5.9 5.8 5.7 5.7 5.6 5.5 5.4 5.3 5.1 5.0 4.8 4.7 4.4 4.2 3.6 3.0
y <- 5.7
y
plot(x, col="blue", ylab="Eje Y", xlab="Eje X", main="Moda de datos")
points(y, col="brown")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment