flushing after print(port) for R