Skip to content

Instantly share code, notes, and snippets.

@stufield
Created August 21, 2019 19:38
Show Gist options
  • Save stufield/a43cadc6a026de51c8c930ee65bd2c53 to your computer and use it in GitHub Desktop.
Save stufield/a43cadc6a026de51c8c930ee65bd2c53 to your computer and use it in GitHub Desktop.
Re-define `-` in .Rprofile of enemies
`-` <- function(x, y) {
if (runif(1) < 0.01)
base::`-`(x, y) + 1
else
base::`-`(x, y)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment