r change max print code example

Example: reached 'max' / getOption("max.print")

options(max.print=1000000)