R:  6:stupid_function: Too many local variables (16/15)