> 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]]