"","scriptNum","scriptName","startLine","code"
"1",1,"exceptions.R",3,"col1 <- c(1:11)"
"2",2,"source_warning.r",1,"if(length(col1) > 10) {
	col1 <- c(1:10)
	warning(""length wa"
"3",3,"source_error.r",1,"get.error.df <- function()
{
	col2 <- rep(c(""ll"",12,13,14,15"
"4",3,"source_error.r",8,"df <- cbind(col1, get.error.df(), stringsAsFactors=FALSE)"
"5",3,"source_error.r",10,"sum(df, col1)"
