Skip to content

Instantly share code, notes, and snippets.

@zimolzak

zimolzak/seven-seg-vs-bits.R

Created April 20, 2017 14:41
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 zimolzak/0e9495e8c669a6613c360b87fe201d92 to your computer and use it in GitHub Desktop.
Save zimolzak/0e9495e8c669a6613c360b87fe201d92 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
seven-seg-vs-bits.R
library(ggplot2)
X = data.frame(d=c(0,1,2,3,4,5,6,7,8,9), segments=c(6,2,5,5,4,5,6,3,7,6), bits=c(0,1,1,2,1,2,2,3,1,2))
ggplot(X, aes(bits, segments, label=d)) + geom_path(position = position_jitter(width=0.1, height=0.1)) + geom_label(position = position_jitter(width=0.3, height=0.3))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment