I hereby claim:
- I am robertzk on github.
- I am robertzk (https://keybase.io/robertzk) on keybase.
- I have a public key ASCNP0cMjdCV7EiZAWBarlaEX29aegpkkPCeFvspkM0ELwo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
env <- new.env()
d <- 1
fn <- function(a, b) {
a + b + d
}
fn2 <- (function() {
d <- 2
A translation of Python's itertools to R.
count(10) # 10 11 12 13 14 ...
count <- function(x, step = 1) {
function() { (x <<- x + step) }
}
capture_calls <- function(e) { | |
e$calls <- sys.calls() | |
signalCondition(e) | |
} | |
fn <- function(x) { | |
call_another_function(x + 1) | |
} | |
call_another_function <- function(y) { |
for (i in 1:10) { | |
assign(paste0("fn", i), eval(bquote(function(x) { x + .(i) }))) | |
} | |
#' This is my function. | |
#' | |
#' This does stuff. | |
#' | |
#' @param x | |
#' @return foo. |
ref_filename <- function(ref) { | |
attr(ref, "srcfile")$filename | |
} | |
frame_text <- function(frame) { | |
if (identical(frame, .GlobalEnv)) { | |
structure(pkg = "_global", | |
"global environment" | |
) |
wrapped <- function(obj) { | |
structure(obj, class = "wrapped") | |
} | |
`[[.wrapped` <- function(obj, x) { | |
if (x == "predict") { | |
.subset2(obj, x) | |
} else { | |
.subset2(obj, "model")[[x]] | |
} |
Ensure you have a Github account. Next, visit the Github help page to set up your Github auth token.
Make sure git is installed. Open up your terminal, and ensure git is installed by running which git
(if you do not see git not found
, then you have to do nothing). If you do not have git, run brew install git
.
Next, configure your git identity.
Finally, copy the authenatication token you obtained earlier, and then run the following line from your terminal (with the token replaced by your token):
echo "export GITHUB_PAT=c1e2feed3242cfa0ab2e560ce4f380f66c6e9547" >> ~/.bash_profile && source ~/.bash_profile
First, visit the Hipchat account API page. You will have to login with you avantcredit.com
hipchat account.
Scroll down and create your Hipchat token with the following permissions:
The token should appear in the list above. Copy the token, and then run the following line from your terminal (with the token replaced by your token):
let @s='^i! git add "$(git rev-parse --show-toplevel)"; git commit -m "^[$a"; git push -q origin `git rev-parse --abbrev-ref HEAD` &^[dd;w^M;@"^M^M^[' |