Skip to content

Instantly share code, notes, and snippets.

@mmajogn
Created February 28, 2015 06:08
Show Gist options
  • Save mmajogn/c9e1979d503198c89f08 to your computer and use it in GitHub Desktop.
Save mmajogn/c9e1979d503198c89f08 to your computer and use it in GitHub Desktop.
#mean#
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)
plot(x)
y<-mean(x)
y
plot(x, col="blue", ylab="Eje Y", xlab="Eje X", main="Media de datos")
points(y, col="red")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment