> j <- function() {
+ if(!exists ("a")){
+ a <- 1
+ } else{
+ a <- a+1
+ } print(a)}
Error: unexpected symbol in:
"a <- a+1
} print"
> j <- function() {
+ if(!exists ("a")){
+ a <- 1
+ } else{
+ a <- a+1
+ } print("a")}
Error: unexpected symbol in:
"a <- a+1
} print"
[[alternative HTML version deleted]]