DeskripsiMichelsonmorley-boxplot.svg	Boxplot representing A. Michelson's data on the speed of light (1882). It consists of five experiments, each made of 20 consecutive runs.
Tanggal	28 Desember 2006
Sumber	Karya sendiri
Pembuat	User:Schutz
SVG genesis InfoField	The SVG code is valid.   Gambar vektor ini dibuat menggunakan R

This data is not from the Michelson-Morley experiment but from Michelson's measurement of the speed of light. See MICHELSON, A. A. (1882): Experimental determination of the velocity of light made at the United States Naval Academy, Annapolis. Astronomic Papers 1, pp. 109-145 U.S. Nautical Almanac Office, or S. M. Stigler (1977): Do robust estimators work with real data? Annals of Statistics 5, 1055–98. Experiment 3 has the smallest data spread, discarding 1:5 runs as outliers.

Boxplot representing A. Michelson's data on the speed of light (1882). It consists of five experiments, each made of 20 consecutive runs. Note that the oblique line is incorrect, probably due to a bug in the Mediawiki software/SVG converter. The graphic was created by User:Schutz for Wikipedia on 28 December 2006, using the R statistical project. The program that generated the graphic is given below; the data and the idea are from the R help page for the morley dataset (see help(morley)). The graph was exported in postscript format, converted to SVG using the postedit command, and the layout was slightly modified using Inkscape before upload.

 
  data(morley)
  morley$Expt <- factor(morley$Expt)
  morley$Run <- factor(morley$Run)
  attach(morley)

  postscript("Michelsonmorley-boxplot.ps", paper="special", height=6, width=6,
             horizontal=F)
  par(las=1)
  par(mar=c(5.1, 5.1, 2.1, 2.1))
  par(font=2)
  par(font.axis=2)
  boxplot(Speed ~ Expt, xlab = "Experiment No.", ylab="Speed of light (km/s minus 299,000)")
  abline(h=792.458, lty=3)
  dev.off()
  

Boxplot representing A. Michelson's data on the speed of light (1882). It consists of five experiments, each made of 20 consecutive runs.

The graphic was originally created by User:Schutz for Wikipedia on 28 December 2006, using the R statistical project. The program that generated the graphic is given below; the data and the idea are from the R help page for the morley dataset (see help(morley)). The graph was exported in PDF format, converted to SVG using Adobe Illustrator, and the layout was slightly modified using Vim before upload.

data(morley)
morley$Expt <- factor(morley$Expt)

pdf("Michelsonmorley-boxplot.pdf", height=6, width=6)
par(las=1, mar=c(5.1, 5.1, 2.1, 2.1))
boxplot(Speed ~ Expt, morley, xlab = "Experiment No.",
        ylab="Speed of light (km/s minus 299,000)")
abline(h=792.458, col="red")
text(3,792.458,"true\nspeed")
dev.off()

Saya, pemegang hak cipta karya ini, merilis karya ini ke domain umum. Lisensi ini berlaku di seluruh dunia. Di sejumlah negara, tindakan ini tidak memungkinkan secara sah; bila seperti itu: Saya memberikan siapa pun hak untuk menggunakan karya ini untuk tujuan apa pun, tanpa persyaratan apa pun, kecuali yang ditetapkan oleh hukum.

The creator and uploader also believes that this graphic is a trivial work which does not qualify for copyright.

• A. J. Weekes (1986) A Genstat Primer. London: Edward Arnold.