Skip to content

Instantly share code, notes, and snippets.

@wush978

wush978/StrToBits.R

Created March 27, 2016 14:49
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save wush978/0f29cd989f14d40397c5 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save wush978/0f29cd989f14d40397c5 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
StrToBits.R
StrToBits <- function(x) {
.x <- charToRaw(x)
.x2 <- rawToBits(.x)
paste(substring(as.character(.x2), 2, 2), collapse = "")
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment